This commit is contained in:
Vítor Santos Costa 2015-11-12 14:53:31 +00:00
parent a91796e4c8
commit e4f5264ded

View File

@ -143,7 +143,7 @@ Execute a new shell.
unix(V) :- var(V), !,
'$do_error'(instantiation_error,unix(V)).
unix(argv(L)) :-
prolog_flag(argv, L).
current_prolog_flag(argv, L).
unix(cd) :- cd('~').
unix(cd(A)) :- cd(A).
unix(environ(X,Y)) :- '$do_environ'(X,Y).