--- gforth/Attic/vars.fs	1995/11/09 18:06:20	1.9
+++ gforth/Attic/vars.fs	1997/03/19 18:27:17	1.15
@@ -29,7 +29,8 @@ hex \ everything now hex!
                                 \ primitives after this word!
   0 Constant false
 
-1 cells Constant cell
+1 cells Constant cell ( -- u ) \ gforth
+1 floats Constant float ( -- u ) \ gforth
 
 20 Constant bl \ used by docon:, must be constant
 
@@ -43,7 +44,7 @@ FF Constant /line
 
 \ User variables                                       13feb93py
 
-\ doesn't produce real user variables now, but normal variables
+\ initialized by COLD
 
 Create main-task  100 cells allot
 main-task tup H ! minimal
@@ -71,9 +72,7 @@ AUser "error            0 "error !
  User >in               0 >in !
  User blk               0 blk !
  User loadfile          0 loadfile !
-\  2User loadfilename	0 0 loadfilename 2!
-\ here ," the terminal" align here swap count 2, Value loadfilename
-\ align here 0 , 0 , Value loadfilename \ !! should be a `user-value'
+
  User loadfilename#	0 loadfilename# !
 
  User loadline          \ number of the currently interpreted