fix use of local skeletons to reload predicates (#919)

2021-04-27 02:00:54 -06:00
parent 48225c3c0a
commit 7e4cfede7d
7 changed files with 540 additions and 601 deletions
--- a/src/loader.pl
+++ b/src/loader.pl
@@ -509,7 +509,8 @@ use_module(Module, Exports, Evacuable) :-
    ;  (  path_atom(Module, ModulePath) ->
          load_context_path(ModulePath, Path),
          open_file(Path, Stream),
-          file_load(Stream, Path, Subevacuable),
+          stream_property(Stream, file_name(PathFileName)),
+          file_load(Stream, PathFileName, Subevacuable),
          '$use_module'(Evacuable, Subevacuable, Exports)
       ;  type_error(atom, Library, load/1)
       )