fix late catch
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@305 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
6e8e59a0b1
commit
366f16f44f
@ -22,7 +22,6 @@ true :- true. % otherwise, $$compile will ignore this clause.
|
|||||||
|
|
||||||
'$live' :-
|
'$live' :-
|
||||||
'$init_system',
|
'$init_system',
|
||||||
'$init_catch',
|
|
||||||
'$do_live'.
|
'$do_live'.
|
||||||
|
|
||||||
'$do_live' :-
|
'$do_live' :-
|
||||||
@ -44,6 +43,8 @@ read_sig.
|
|||||||
|
|
||||||
|
|
||||||
'$init_system' :-
|
'$init_system' :-
|
||||||
|
% do catch as early as possible
|
||||||
|
'$init_catch',
|
||||||
(
|
(
|
||||||
'$access_yap_flags'(15, 0) ->
|
'$access_yap_flags'(15, 0) ->
|
||||||
'$version'
|
'$version'
|
||||||
|
Reference in New Issue
Block a user