iimprove SWI compat

2011-03-15 23:49:28 +00:00
parent 8421af32e8
commit 36a0023fbf
22 changed files with 80 additions and 3139 deletions
--- a/library/dialect/swi.yap
+++ b/library/dialect/swi.yap
@@ -5,7 +5,6 @@

 :- module(system, [concat_atom/2,
 		   concat_atom/3,
-		   setenv/2,
 		   read_clause/1,
 		   string/1,
 		   chdir/1,
@@ -154,8 +153,6 @@ concat_atom(List, New) :-
 	atomic_concat(List, New).


-setenv(X,Y) :- unix(putenv(X,Y)).
-
 read_clause(X,Y) :-
 	read_term(X,Y,[singetons(warning)]).