--- gforth/Attic/vars.fs 1994/05/07 14:56:07 1.3 +++ gforth/Attic/vars.fs 1994/07/08 15:01:05 1.4 @@ -44,7 +44,8 @@ AUser "error 0 "error ! User >in 0 >in ! User blk 0 blk ! User loadfile 0 loadfile ! - + 2User loadfilename 0 0 loadfilename 2! + User loadline \ number of the currently interpreted \ (in TIB) line if the interpretation \ is in a textfile @@ -65,4 +66,7 @@ AUser dpp normal-dp dpp ! AUser LastCFA AUser Last +User locals-size \ this is the current size of the locals stack + \ frame of the current word +