[Yap-commits] CVS: pl yio.yap,1.49,1.50

[Paulo M. <pm...@us...>]

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),