make full init even before entering Prolog top-level

2012-09-21 11:49:59 +01:00
parent ceb5785120
commit d5bf100b71
7 changed files with 68 additions and 48 deletions
--- a/C/c_interface.c
+++ b/C/c_interface.c
@@ -3186,7 +3186,7 @@ YAP_Init(YAP_init_args *yap_init)
      Yap_AttsSize = 2048*sizeof(CELL);
    if (restore_result == DO_ONLY_CODE) {
      /* first, initialise the saved state */
-      Term t_goal = MkAtomTerm(AtomStartupSavedState);
+      Term t_goal = MkAtomTerm(AtomInitProlog);
      YAP_RunGoalOnce(t_goal);
      Yap_InitYaamRegs();
      /* reset stacks */