--- gforth/kernel/vars.fs	2006/02/12 23:45:55	1.38
+++ gforth/kernel/vars.fs	2006/02/18 13:12:52	1.39
@@ -48,7 +48,7 @@ has? floating [IF]
 
 FF Constant /line
 
-has? files [IF]
+has? file [IF]
 40 Constant c/l
 10 Constant l/s
 400 Constant chars/block