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

fix bad ! register when calling continuation of meta-predicate (obs from A Kimmig).

Browse Source
This commit is contained in:
Vítor Manuel de Morais Santos Costa 2009-11-03 23:17:06 +00:00
parent 69d34fb0ce
commit 2fdf8e9bda
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
C/absmi.c
View File

@ -14056,7 +14056,7 @@ Yap_absmi(int inp)
/* for profiler */ /* for profiler */
save_pc(); save_pc();
ALWAYS_LOOKAHEAD(pen->OpcodeOfPred); ALWAYS_LOOKAHEAD(pen->OpcodeOfPred);
ENV_YREG[E_CB] = pt0[E_CB]; ENV_YREG[E_CB] = (CELL)B;
#ifdef LOW_LEVEL_TRACER #ifdef LOW_LEVEL_TRACER
if (Yap_do_low_level_trace) if (Yap_do_low_level_trace)
low_level_trace(enter_pred,pen,XREGS+1); low_level_trace(enter_pred,pen,XREGS+1);