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' :-
|
||||
'$init_system',
|
||||
'$init_catch',
|
||||
'$do_live'.
|
||||
|
||||
'$do_live' :-
|
||||
@ -44,6 +43,8 @@ read_sig.
|
||||
|
||||
|
||||
'$init_system' :-
|
||||
% do catch as early as possible
|
||||
'$init_catch',
|
||||
(
|
||||
'$access_yap_flags'(15, 0) ->
|
||||
'$version'
|
||||
|
Reference in New Issue
Block a user