[gforth] / gforth / wf.fs  

gforth: gforth/wf.fs

Diff for /gforth/wf.fs between version 1.48 and 1.49

version 1.48, Sun Oct 8 11:30:56 2006 UTC version 1.49, Wed Oct 11 19:18:51 2006 UTC
Line 331 
Line 331 
 [ELSE]  [ELSE]
 : parse-string ( addr u -- )  : parse-string ( addr u -- )
     evaluate-input cell new-tib #tib ! tib !      evaluate-input cell new-tib #tib ! tib !
     ['] parse-line catch pop-file rethrow ;      ['] parse-line catch pop-file throw ;
 [THEN] [THEN]  [THEN] [THEN]
   
 Variable expand-link  Variable expand-link

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help