get rid of suprious definition of $message

This commit is contained in:
Vitor Santos Costa 2008-08-27 00:43:40 +01:00
parent d5d5a6c95f
commit 24c2650472

View File

@ -282,8 +282,6 @@ cvt_bindings([[Name|Value]|L],[AName=Value|Bindings]) :-
atom_codes(AName, Name),
cvt_bindings(L,Bindings).
'$messages':prolog_message(_,L,L).
prolog:working_directory(OCWD,NCWD) :-
getcwd(OCWD),
(var(NCWD) -> true ; cd(NCWD)).