--- gforth/Attic/vars.fs 1995/11/07 18:07:04 1.8 +++ gforth/Attic/vars.fs 1995/11/30 18:01:49 1.10 @@ -65,14 +65,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