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

2009-11-04 12:17:17 +00:00
parent 6870ba039d
commit 8f46f3d71d
1 changed files with 2 additions and 1 deletions
--- a/C/exec.c
+++ b/C/exec.c
@@ -74,8 +74,9 @@ CallPredicate(PredEntry *pen, choiceptr cut_pt, yamop *code) {
    CP = P;
    ENV = YENV;
    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;
  return TRUE;
 }