gforth/kernel/int.fs - diff

Return to int.fs CVS log

Up to [gforth] / gforth / kernel

version 1.85, 2003/01/08 10:45:39	version 1.86, 2003/01/10 21:19:59
Line 450 has? standardthreading has? compiler and	Line 450 has? standardthreading has? compiler and
\G @i{a-addr} is the start of the Forth code after @code{DOES>}.	\G @i{a-addr} is the start of the Forth code after @code{DOES>}.
dodoes: over ! cell+ ! ;	dodoes: over ! cell+ ! ;

	' drop alias does-handler! ( a_addr -- ) \ gforth
	\G Create a @code{DOES>}-handler at address @i{a-addr}. Normally,
	\G @i{a-addr} points just behind a @code{DOES>}.

2 cells constant /does-handler ( -- n ) \ gforth	2 cells constant /does-handler ( -- n ) \ gforth
\G The size of a @code{DOES>}-handler (includes possible padding).	\G The size of a @code{DOES>}-handler (includes possible padding).