fix absolute_file_path and its use by load_files to new SWI framework.

2011-06-21 22:36:09 +01:00
parent 249010bd90
commit dba2fd398f
3 changed files with 26 additions and 8 deletions
--- a/pl/modules.yap
+++ b/pl/modules.yap
@@ -668,7 +668,7 @@ abolish_module(_).
 	;
 	 Goal =	reexport(ModuleSource,Spec)
 	),
-	absolute_file_name(ModuleSource, File, [access(read),file_type(source),file_errors(fail),solutions(first)]),
+	absolute_file_name(ModuleSource, File, [access(read),file_type(prolog),file_errors(fail),solutions(first),expand(true)]),
 	'$load_files'(File, [if(not_loaded),imports([])], Goal),
 	recorded('$module', '$module'(FullFile, Mod, Exports),_),
 	atom_concat(File, _, FullFile), !,