--- gforth/environ.fs	1997/08/31 19:31:28	1.14
+++ gforth/environ.fs	1998/12/08 22:02:39	1.17
@@ -1,6 +1,6 @@
 \ environmental queries
 
-\ Copyright (C) 1995 Free Software Foundation, Inc.
+\ Copyright (C) 1995,1996,1997,1998 Free Software Foundation, Inc.
 
 \ This file is part of Gforth.
 
@@ -29,11 +29,11 @@ Create environment-wordlist  wordlist dr
 	false
     endif ;
 
-: e? name environment? ; immediate
+: 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
 get-order environment-wordlist swap 1+ set-order