fix quote

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1437 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2005-11-03 18:27:10 +00:00
parent 5d04ca9766
commit bd8472754d

View File

@ -11,8 +11,11 @@
* File: errors.yap *
* comments: error messages for YAP *
* *
* Last rev: $Date: 2005-11-01 18:54:06 $,$Author: vsc $ *
* Last rev: $Date: 2005-11-03 18:27:10 $,$Author: vsc $ *
* $Log: not supported by cvs2svn $
* Revision 1.69 2005/11/01 18:54:06 vsc
* small fixes
*
* Revision 1.68 2005/10/29 01:28:37 vsc
* make undefined more ISO compatible.
*
@ -272,7 +275,7 @@ print_message(Level, Mss) :-
'$do_print_message'(declaration(Args,Action)) :- !,
format(user_error,'declaration ~w ~w.', [Args,Action]).
'$do_print_message'(defined_elsewhere(P,F)) :- !,
format(user_error, 'predicate ~q previously defined in file ~w'',[P,F]).
format(user_error, 'predicate ~q previously defined in file ~w',[P,F]).
'$do_print_message'(import(Pred,To,From,private)) :- !,
format(user_error,'Importing private predicate ~w:~w to ~w.',
[From,Pred,To]).