diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix typo

Browse Source
This commit is contained in:
Vitor Santos Costa 2014-01-10 15:34:02 +00:00
parent bcc1757989
commit 2c8fcc6698
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pl/errors.yap
View File

@ -286,5 +286,5 @@ print_message(_, Term) :-
flush_output(user_error), flush_output(user_error),
'$messages':prefix(Level, LinePrefix, Stream, LinesF, Lines), !, '$messages':prefix(Level, LinePrefix, Stream, LinesF, Lines), !,
print_message_lines(Stream, LinePrefix, LinesF). print_message_lines(Stream, LinePrefix, LinesF).
s

4
pl/messages.yap
View File

@ -511,12 +511,12 @@ prolog:print_message_lines(S, kind(Kind), Lines) :- !,
], ],
AllLines), AllLines),
print_message_lines(S, Prefix, AllLines). print_message_lines(S, Prefix, AllLines).
prolog:print_message_lines(S, P-Opts, Lines) :- !, prolog:print_message_lines(S, P-Opts, Lines) :-
atom(P), !, atom(P), !,
atom_concat('~N', P, Prefix), atom_concat('~N', P, Prefix),
format(S, Prefix, Opts), format(S, Prefix, Opts),
print_message_line(S, Lines, Rest), print_message_line(S, Lines, Rest),
prolog:print_message_lines(S, P-Opts, Rest)x. prolog:print_message_lines(S, P-Opts, Rest).
prolog:print_message_lines(S, P, Lines) :- prolog:print_message_lines(S, P, Lines) :-
atom(P), !, atom(P), !,
atom_concat('~N', P, Prefix), atom_concat('~N', P, Prefix),