[gforth] / gforth / source.fs  

gforth: gforth/source.fs

Diff for /gforth/source.fs between version 1.1 and 1.2

version 1.1, Tue Nov 7 18:08:47 1995 UTC version 1.2, Wed Nov 29 20:20:37 1995 UTC
Line 32 
Line 32 
   
 : sourcepos, ( -- )  : sourcepos, ( -- )
     \ record the current source position HERE      \ record the current source position HERE
     loadfilename# @ , loadline @ , ;      loadfilename# @ , sourceline# , ;
   
 : get-sourcepos ( a-addr -- c-addr u n )  : get-sourcepos ( a-addr -- c-addr u n )
     \ c-addr u is the filename, n is the line number      \ c-addr u is the filename, n is the line number

Generate output suitable for use with a patch program
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
CVS Admin

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help