--- gforth/engine/engine.c 2011/11/13 00:45:21 1.114 +++ gforth/engine/engine.c 2011/12/31 15:29:26 1.116 @@ -1,6 +1,6 @@ /* Gforth virtual machine (aka inner interpreter) - Copyright (C) 1995,1996,1997,1998,2000,2003,2004,2005,2006,2007,2008,2010 Free Software Foundation, Inc. + Copyright (C) 1995,1996,1997,1998,2000,2003,2004,2005,2006,2007,2008,2010,2011 Free Software Foundation, Inc. This file is part of Gforth. @@ -424,7 +424,7 @@ Label *gforth_engine(Xt *ip0, Cell *sp0, #endif } -#if !(defined(GFORTH_DEBUGGING) || defined(INDIRECT_THREADED) || defined(DOUBLY_INDIRECT) || defined(VM_PROFILING)) +#ifdef USE_TOS sp += STACK_CACHE_DEFAULT-1; /* some of those registers are dead, but its simpler to initialize them all */ spTOS = sp[0]; spb = sp[-1];