--- gforth/source.fs	1995/11/07 18:08:47	1.1
+++ gforth/source.fs	1995/11/29 20:20:37	1.2
@@ -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