version 1.127, 2003/05/04 08:28:28
|
version 1.130, 2003/05/18 18:27:44
|
Line 106
|
Line 106
|
\E set-current |
\E set-current |
\E store-optimization on |
\E store-optimization on |
\E ' noop tail-nextp2 ! \ now INST_TAIL just stores, but does not jump |
\E ' noop tail-nextp2 ! \ now INST_TAIL just stores, but does not jump |
|
\E |
|
\E include-skipped-insts on \ static superinsts include cells for components |
|
\E \ useful for dynamic programming and |
|
\E \ superinsts across entry points |
|
|
\ |
\ |
\ |
\ |
Line 2271 assert(0);
|
Line 2275 assert(0);
|
|
|
\+ |
\+ |
|
|
|
\g static_super |
|
|
|
\C #if !defined(GFORTH_DEBUGGING) && !defined(INDIRECT_THREADED) && !defined(DOUBLY_INDIRECT) && !defined(VM_PROFILING) |
|
|
include(peeprules.vmg) |
include(peeprules.vmg) |
|
|
|
\C #endif |
|
|
\g end |
\g end |