This subroutine initializes a path object.
This is done by setting the given file name as reference to the script, to look the path up in and emptying the path completely.
Path object to initialize
Filename of the Lua script, this path is located in
subroutine aot_init_path(me, Filename) !> Path object to initialize type(aot_path_type), intent(out) :: me !> Filename of the Lua script, this path is located in character(len=*), optional, intent(in) :: Filename ! Finalize the path first, just in case it might have had any entries. call aot_fin_path(me) if (present(Filename)) then me%LuaFilename = adjustl(trim(Filename)) else me%LuaFilename = '' end if me%rootHandle = 0 end subroutine aot_init_path