[gforth] / gforth / history.fs  

gforth: gforth/history.fs

Diff for /gforth/history.fs between version 1.44 and 1.45

version 1.44, Sun Feb 19 15:11:22 2006 UTC version 1.45, Sun Feb 19 15:13:38 2006 UTC
Line 73 
Line 73 
 ' backspaces is back-restore  ' backspaces is back-restore
   
 : clear-line ( max span addr pos1 -- max addr )  : clear-line ( max span addr pos1 -- max addr )
   back-restore over spaces swap backspaces ;    back-restore over spaces swap back-restore ;
   
 \ : clear-tib ( max span addr pos -- max 0 addr 0 false )  \ : clear-tib ( max span addr pos -- max 0 addr 0 false )
 \   clear-line 0 tuck dup ;  \   clear-line 0 tuck dup ;

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help