improve the interface a bit more.
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@476 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
@@ -398,7 +398,7 @@ debugging :-
|
||||
'$flags'(G,M,F,F),
|
||||
F /\ 16'2000 =\= 0, !, % dynamic procedure, immediate semantics
|
||||
repeat,
|
||||
'$db_last_age'(M:G,Max),
|
||||
( '$db_last_age'(M:G,Max) -> true ; !, fail ),
|
||||
'$get_value'(spy_cl,Cl),
|
||||
'$get_value'(spy_gn,L),
|
||||
Maxx is Max+1,
|
||||
|
Reference in New Issue
Block a user