new scheme for flags.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@949 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2003-12-04 18:13:04 +00:00
parent 945adacdd5
commit 4c264a968a
12 changed files with 48 additions and 56 deletions
--- a/C/init.c
+++ b/C/init.c
@@ -777,7 +777,7 @@ InitCodes(void)
  heap_regs->update_mode = UPDATE_MODE_LOGICAL;
  heap_regs->consultbase = heap_regs->consultsp =
    heap_regs->consultlow + heap_regs->consultcapacity;
-  heap_regs->compiler_compile_mode = 1;
+  heap_regs->compiler_compile_mode = 0; /* fast will be for native code */
  heap_regs->maxdepth = 0;
  heap_regs->maxlist  = 0;