fix bad passing of ! destination if we were running at an exec: affected debugger.

This commit is contained in:
Vítor Manuel de Morais Santos Costa 2009-11-04 12:17:17 +00:00
parent 6870ba039d
commit 8f46f3d71d

View File

@ -74,8 +74,9 @@ CallPredicate(PredEntry *pen, choiceptr cut_pt, yamop *code) {
CP = P; CP = P;
ENV = YENV; ENV = YENV;
YENV = ASP; YENV = ASP;
YENV[E_CB] = (CELL) cut_pt;
} }
/* make sure we have access to the user given cut */
YENV[E_CB] = (CELL) cut_pt;
P = code; P = code;
return TRUE; return TRUE;
} }