more fixes for catch and throw

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@340 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2002-01-30 02:20:44 +00:00
parent d7109e6974
commit af7cb4cd93
3 changed files with 3 additions and 3 deletions
--- a/C/exec.c
+++ b/C/exec.c
@@ -1315,6 +1315,6 @@ InitExecFs(void)
  InitCPred("$restore_regs", 1, p_restore_regs, SafePredFlag);
  InitCPred("$restore_regs", 2, p_restore_regs2, SafePredFlag);
  InitCPred("$clean_ifcp", 1, p_clean_ifcp, SafePredFlag);
-  InitCPred("$jump_env_and_store_ball", 1, p_jump_env, SafePredFlag);
+  InitCPred("$jump_env_and_store_ball", 1, p_jump_env, 0);
 }