Diff for /gforth/Attic/vars.fs between versions 1.8 and 1.15

version 1.8, 1995/11/07 18:07:04 version 1.15, 1997/03/19 18:27:17
Line 29  hex \ everything now hex! Line 29  hex \ everything now hex!
                                 \ primitives after this word!                                  \ primitives after this word!
   0 Constant false    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  20 Constant bl \ used by docon:, must be constant
   
Line 43  FF Constant /line Line 44  FF Constant /line
   
 \ User variables                                       13feb93py  \ User variables                                       13feb93py
   
 \ doesn't produce real user variables now, but normal variables  \ initialized by COLD
   
 Create main-task  100 cells allot  Create main-task  100 cells allot
 main-task tup H ! minimal  main-task tup H ! minimal
Line 65  AUser errorhandler Line 66  AUser errorhandler
   
 AUser "error            0 "error !  AUser "error            0 "error !
   
    User tibstack
  User >tib   User >tib
  User #tib   User #tib
  User >in               0 >in !   User >in               0 >in !
  User blk               0 blk !   User blk               0 blk !
  User loadfile          0 loadfile !   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 loadfilename#     0 loadfilename# !
   
  User loadline          \ number of the currently interpreted   User loadline          \ number of the currently interpreted

Removed from v.1.8  
changed lines
  Added in v.1.15


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>