diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix user-c spying.

Browse Source
This commit is contained in:
Vitor Santos Costa 2011-07-22 14:10:55 +01:00
parent 80966dd286
commit c78aa3cf1d
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/pldoc

@ -1 +1 @@
Subproject commit d41891071193a6c9d20b30bdbe709531948e111b Subproject commit b1c05f2dfba27286d3810c6921d027cecd528b01

2
pl/debug.yap
View File

@ -495,7 +495,7 @@ debugging :-
'$continue_debugging'(no, '$execute_nonstop'(G,M)). '$continue_debugging'(no, '$execute_nonstop'(G,M)).
'$spycall'(G, M, CalledFromDebugger, InRedo) :- '$spycall'(G, M, CalledFromDebugger, InRedo) :-
'$flags'(G,M,F,F), '$flags'(G,M,F,F),
F /\ 0x18402000 =\= 0, !, % dynamic procedure, logical semantics, user-C, or source F /\ 0x08402000 =\= 0, !, % dynamic procedure, logical semantics, or source
% use the interpreter % use the interpreter
CP is '$last_choice_pt', CP is '$last_choice_pt',
'$clause'(G, M, Cl, _), '$clause'(G, M, Cl, _),