--- gforth/Attic/vars.fs	1995/11/07 18:07:04	1.8
+++ gforth/Attic/vars.fs	1997/02/08 22:58:16	1.14
@@ -30,6 +30,7 @@ hex \ everything now hex!
   0 Constant false
 
 1 cells Constant cell
+1 floats Constant float
 
 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
@@ -65,14 +66,13 @@ AUser errorhandler
 
 AUser "error            0 "error !
 
+ User tibstack
  User >tib
  User #tib
  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