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

version 1.48, 2006/10/08 11:30:56 version 1.49, 2006/10/11 19:18:51
Line 331  s" Gforth" environment? [IF] s" 0.5.0" s Line 331  s" Gforth" environment? [IF] s" 0.5.0" s
 [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

Removed from v.1.48  
changed lines
  Added in v.1.49


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>