gforth/other.fs - diff

Return to other.fs CVS log

Up to [gforth] / gforth

version 1.5, 1998/12/08 22:02:49	version 1.6, 1998/12/23 23:59:21
Line 23	Line 23
\ the cross compiler should run	\ the cross compiler should run
\ with any ansforth environment	\ with any ansforth environment

: ?EXIT s" IF EXIT THEN" evaluate ; immediate	: ?EXIT POSTPONE if POSTPONE exit POSTPONE then ; immediate
: bounds over + swap ;	: bounds over + swap ;
: name bl word ;	: name bl word ;
: on true swap ! ;	: on true swap ! ;