version 1.8, 1998/12/08 22:02:36
|
version 1.9, 1999/12/03 18:24:21
|
Line 24
|
Line 24
|
|
|
vocabulary assembler ( -- ) \ tools-ext |
vocabulary assembler ( -- ) \ tools-ext |
|
|
: init-asm ( -- ) |
: init-asm ( -- ) \ gforth |
also assembler ; |
also assembler ; |
|
|
: code ( "name" -- colon-sys ) \ tools-ext |
: code ( "name" -- colon-sys ) \ tools-ext |
Line 53 interpret/compile: ;code ( compilation.
|
Line 53 interpret/compile: ;code ( compilation.
|
( end a code definition ) |
( end a code definition ) |
lastxt here over - flush-icache |
lastxt here over - flush-icache |
previous ?struc reveal ; |
previous ?struc reveal ; |
|
|