diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

win32 fixes

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1689 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2006-08-30 01:06:30 +00:00
parent 31fb1d0345
commit cd5bc14cfc
13 changed files with 295 additions and 38 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
pl/init.yap
View File

@@ -116,15 +116,15 @@ system_mode(verbose,off) :- set_value('$verbose',off).
:- multifile goal_expansion/3.
:- dynamic_predicate(goal_expansion/3, logical).
:- dynamic goal_expansion/3.
:- multifile term_expansion/2.
:- dynamic_predicate(term_expansion/2, logical).
:- dynamic term_expansion/2.
:- multifile file_search_path/2.
:- dynamic_predicate(file_search_path/2, logical).
:- dynamic file_search_path/2.
file_search_path(library, Dir) :-
library_directory(Dir).
@@ -133,11 +133,7 @@ file_search_path(system, Dir) :-
:- multifile library_directory/1.
:- dynamic_predicate(library_directory/1, logical).
library_directory(D) :-
getenv('YAPSHAREDIR', D).
:- get_value(system_library_directory,D), assert(library_directory(D)).
:- dynamic library_directory/1.