gforth/environ.fs - diff

Return to environ.fs CVS log

Up to [gforth] / gforth

version 1.15, 1997/09/13 12:04:55	version 1.16, 1998/10/10 10:28:34
Line 31 Create environment-wordlist wordlist dr	Line 31 Create environment-wordlist wordlist dr

: e? name environment? 0= ABORT" environmental dependency not existing" ;	: e? name environment? 0= ABORT" environmental dependency not existing" ;

: has? name environment? IF ELSE false THEN ;	: has? name environment? 0= IF false THEN ;

: $has? environment? IF ELSE false THEN ;	: $has? environment? 0= IF false THEN ;

environment-wordlist set-current	environment-wordlist set-current
get-order environment-wordlist swap 1+ set-order	get-order environment-wordlist swap 1+ set-order