| |
|
| decimal |
decimal |
| |
|
| cell 2 = [IF] 32 [ELSE] 256 [THEN] KB makekernal ( size ) |
cell 2 = [IF] 32 [ELSE] 256 [THEN] KB makekernel ( size ) |
| \ create image-header |
\ create image-header |
| 0 A, \ base address |
0 A, \ base address |
| 0 , \ checksum |
0 , \ checksum |
| |
|
| 0 AConstant forthstart |
0 AConstant forthstart |
| |
|
| |
doc-off |
| include aliases.fs \ include primitive aliases |
include aliases.fs \ include primitive aliases |
| |
doc-on |
| \ include cond.fs \ conditional compile |
\ include cond.fs \ conditional compile |
| \ include patches.fs \ include primitive patches |
\ include patches.fs \ include primitive patches |
| |
|
| include add.fs \ additional things |
include add.fs \ additional things |
| include errore.fs |
include errore.fs |
| include version.fs |
include version.fs |
| include kernal.fs \ load kernal |
include kernel.fs \ load kernel |
| include extend.fs \ load core-extended |
include extend.fs \ load core-extended |
| include tools.fs \ load tools ( .s dump ) |
include tools.fs \ load tools ( .s dump ) |
| include toolsext.fs |
include toolsext.fs |