gforth/main.fs - diff

Return to main.fs CVS log

Up to [gforth] / gforth

version 1.7, 1994/07/27 13:37:05	version 1.8, 1994/08/19 17:47:24
Line 13 include cross.fs \ include	Line 13 include cross.fs \ include

decimal	decimal

128 KB makekernal , 0 , 0 , 0 A, 0 A,	256 KB makekernal , 0 , 0 , 0 A, 0 A,

UNLOCK ghost - drop \ ghost must exist because - would be treated as number	UNLOCK ghost - drop \ ghost must exist because - would be treated as number
LOCK	LOCK
Line 44 decimal	Line 44 decimal

\ 64 KB 0 cells ! \ total Space... defined above!	\ 64 KB 0 cells ! \ total Space... defined above!
here 1 cells ! \ Size of the system	here 1 cells ! \ Size of the system
2 KB 2 cells ! \ Return and fp stack size	16 KB 2 cells ! \ Return and fp stack size
' boot >body 3 cells ! \ Entry point	' boot >body 3 cells ! \ Entry point

UNLOCK Tlast @	UNLOCK Tlast @