--- gforth/backtrac.fs 2003/03/09 15:16:46 1.8 +++ gforth/backtrac.fs 2003/03/11 21:03:29 1.9 @@ -43,7 +43,8 @@ end-struct buffer% \ backtrace stuff -create backtrace-rs-buffer buffer% %allot \ copy of the return stack at throw +create backtrace-rs-buffer buffer% %allot drop +\ copy of the return stack at throw : init-backtrace ( -- ) backtrace-rs-buffer init-buffer ;