Added built-in predicate format/1 for compatibility with SWI-Prolog.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2303 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
pmoura 2008-08-10 15:44:12 +00:00
parent b3a0b412f1
commit ad67cd43af
2 changed files with 12 additions and 0 deletions

View File

@ -4854,6 +4854,14 @@ The two @code{~t} escape sequence force filling both before and after
@code{Hello}. Space is then evenly divided between the right and the
left sides.
@item format(+@var{T})
@findex format/1
@saindex format/1
@cnindex format/1
Print formatted output to the current output stream.
@item format(+@var{S},+@var{T},+@var{L})
@findex format/3
@saindex format/3

View File

@ -592,6 +592,10 @@ print(Stream,T) :-
print(_,_).
format(T) :-
format(T, []).
/* interface to user portray */
'$portray'(T) :-
\+ '$undefined'(portray(_),user),