| version 1.4, Tue Jul 16 20:57:06 1996 UTC | version 1.5, Wed Aug 21 14:58:37 1996 UTC | ||
|---|---|---|---|
|
|
||
| :noname ( -- colon-sys ) | :noname ( -- colon-sys ) | ||
| align here lastxt code-address! | align here lastxt code-address! | ||
| defstart init-asm ; | defstart init-asm ; | ||
| special: ;code | interpret/compile: ;code | ||
| : end-code ( colon-sys -- ) \ gforth end_code | : end-code ( colon-sys -- ) \ gforth end_code | ||
| ( end a code definition ) | ( end a code definition ) |
|
||||||||
|
CVS Admin Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |