gforth/kernel/comp.fs - diff

Return to comp.fs CVS log

Up to [gforth] / gforth / kernel

version 1.24, 2000/08/10 20:46:26	version 1.25, 2000/08/11 19:49:40
Line 431 DOES> @ execute ;	Line 431 DOES> @ execute ;

[THEN]	[THEN]

: Defers ( "name" -- ) \ gforth	: Defers ( compilation "name" -- ; run-time ... -- ... ) \ gforth
	\G Compiles the present contents of the deferred word @i{name}
	\G into the current definition. I.e., this produces static
	\G binding as if @i{name} was not deferred.
' >body @ compile, ; immediate	' >body @ compile, ; immediate

:noname	:noname
Line 464 interpret/compile: TO ( w "name" -- ) \	Line 467 interpret/compile: TO ( w "name" -- ) \

:noname ' >body @ ;	:noname ' >body @ ;
:noname ' >body postpone ALiteral postpone @ ;	:noname ' >body postpone ALiteral postpone @ ;
interpret/compile: What's ( "name" -- addr ) \ gforth	interpret/compile: What's ( interpretation "name" -- xt; compilation "name" -- ; run-time -- xt ) \ gforth
	\G @i{Xt} is the XT that is currently assigned to @i{name}.

\ \ interpret/compile:	\ \ interpret/compile: