gforth/kernel/int.fs - diff

Return to int.fs CVS log

Up to [gforth] / gforth / kernel

version 1.37, 1999/07/05 18:54:21	version 1.38, 1999/10/30 15:48:17
Line 244 AVariable lookup forth-wordlist l	Line 244 AVariable lookup forth-wordlist l
AVariable current ( -- addr ) \ gforth	AVariable current ( -- addr ) \ gforth
\G VARIABLE: holds the wid of the current compilation word list.	\G VARIABLE: holds the wid of the current compilation word list.
AVariable voclink forth-wordlist wordlist-link voclink !	AVariable voclink forth-wordlist wordlist-link voclink !
lookup AValue context ( -- addr ) \ gforth	\ lookup AValue context ( -- addr ) \ gforth
\G VALUE: @code{context} @code{@@} is the wid of the word list at the	Defer context ( -- addr ) \ gforth
	\G @code{context} @code{@@} is the wid of the word list at the
\G top of the search order stack.	\G top of the search order stack.

	' lookup is context
forth-wordlist current !	forth-wordlist current !

\ \ header, finding, ticks 17dec92py	\ \ header, finding, ticks 17dec92py