generic tmp alloc fixes.

This commit is contained in:
Vitor Santos Costa
2017-10-02 08:58:51 +01:00
parent c06dd92761
commit 9f1ef65ff5
15 changed files with 341 additions and 307 deletions

View File

@@ -406,7 +406,7 @@ be lost.
'$spycall'(G, M, CP, not_expanded) :-
'$is_metapredicate'(G, M),
!,
'$expand_meta_call'(M:G, [], G1),
'$debugger_expand_meta_call'(M:G, [], G1),
'$spycall'(G1, M, CP, expanded).
'$spycall'(G, M, CP, _) :-
'$undefined'(G, M), !,
@@ -426,7 +426,9 @@ be lost.
'$re_spycall'(E, G, M, L, H)
).
'$spygoal'(G, M, GoalNumber, H) :-
%% @pred $spygoal( +Goal, +Module, +CallId, +CallInfo)
%%
%% Actually debugs a % goal! '$spygoal'(G, M, GoalNumber, H) :-
'$is_source'( G, M ), % use the interpreter
!,
gated_call(