gforth/kernel/comp.fs - diff

Return to comp.fs CVS log

Up to [gforth] / gforth / kernel

version 1.49, 2003/01/10 21:43:41	version 1.50, 2003/01/14 22:52:56
Line 602 defer ;-hook ( sys2 -- sys1 )	Line 602 defer ;-hook ( sys2 -- sys1 )
;-hook ?struc fini, comp[ reveal postpone [ ; immediate restrict	;-hook ?struc fini, comp[ reveal postpone [ ; immediate restrict
[ELSE]	[ELSE]
: ; ( compilation colon-sys -- ; run-time nest-sys ) \ core semicolon	: ; ( compilation colon-sys -- ; run-time nest-sys ) \ core semicolon
;-hook ?struc [compile] exit reveal postpone [ ; immediate restrict	;-hook ?struc [compile] exit finish-code reveal postpone [ ; immediate restrict
[THEN]	[THEN]

\ \ Search list handling: reveal words, recursive 23feb93py	\ \ Search list handling: reveal words, recursive 23feb93py