Update of /cvsroot/yap/pl
In directory sc8-pr-cvs10.sourceforge.net:/tmp/cvs-serv12341/pl
Modified Files:
yio.yap
Log Message:
Added built-in predicate format/1 for compatibility with SWI-Prolog.
Index: yio.yap
===================================================================
RCS file: /cvsroot/yap/pl/yio.yap,v
retrieving revision 1.49
retrieving revision 1.50
diff -u -r1.49 -r1.50
--- yio.yap 26 May 2008 09:16:24 -0000 1.49
+++ yio.yap 10 Aug 2008 15:44:12 -0000 1.50
@@ -592,6 +592,10 @@
print(_,_).
+format(T) :-
+ format(T, []).
+
+
/* interface to user portray */
'$portray'(T) :-
\+ '$undefined'(portray(_),user),
|
