version 1.236, 2010/12/31 18:09:02
|
version 1.237, 2011/11/11 22:22:05
|
Line 714 int gforth_go(void *image, int stack, Ce
|
Line 714 int gforth_go(void *image, int stack, Ce
|
#endif |
#endif |
|
|
/* ensure that the cached elements (if any) are accessible */ |
/* ensure that the cached elements (if any) are accessible */ |
#if !(defined(GFORTH_DEBUGGING) || defined(INDIRECT_THREADED) || defined(DOUBLY_INDIRECT) || defined(VM_PROFILING)) |
#if !(defined(INDIRECT_THREADED) || defined(DOUBLY_INDIRECT) || defined(VM_PROFILING)) |
sp0 -= 8; /* make stuff below bottom accessible for stack caching */ |
sp0 -= 8; /* make stuff below bottom accessible for stack caching */ |
fp0--; |
fp0--; |
#endif |
#endif |