send the abort message at the right place.

This commit is contained in:
Vitor Santos Costa 2009-05-04 22:31:03 -05:00
parent c2e6456c25
commit 6a6b18b045

View File

@ -37,10 +37,10 @@ file_position(FileName,LN,MsgCodes) -->
generate_message(halt) --> !,
['YAP execution halted'].
generate_message('$abort') :- !,
generate_message('$abort') --> !,
['YAP execution aborted'].
generate_message(abort(user)) --> !,
['YAP execution aborted'].
generate_message(abort(user)) :- !,
['YAP execution aborted: user request'].
generate_message(loading(_,user)) --> !.
generate_message(loading(What,AbsoluteFileName)) --> !,
[ '~a ~a...' - [What, AbsoluteFileName] ].