make top-level error handling a bit more compatible with SWI.

This commit is contained in:
Vitor Santos Costa
2009-03-10 18:07:50 +00:00
parent fc2e01f320
commit 503d97af90
6 changed files with 19 additions and 15 deletions

View File

@@ -127,7 +127,7 @@ system_mode(verbose,off) :- set_value('$verbose',off).
:- use_module('messages.yap').
:- use_module('hacks.yap').
'$system_module'('$message').
'$system_module'('$messages').
'$system_module'('$hacks').
yap_hacks:cut_by(CP) :- '$$cut_by'(CP).