--- gforth/source.fs 1995/11/07 18:08:47 1.1 +++ gforth/source.fs 1996/09/19 22:17:37 1.3 @@ -19,7 +19,7 @@ \ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. -\ related stuff can be found in kernal.fs +\ related stuff can be found in kernel.fs \ this stuff is used by (at least) assert.fs and debugging.fs @@ -32,7 +32,7 @@ end-struct sourcepos : sourcepos, ( -- ) \ record the current source position HERE - loadfilename# @ , loadline @ , ; + loadfilename# @ , sourceline# , ; : get-sourcepos ( a-addr -- c-addr u n ) \ c-addr u is the filename, n is the line number