[gforth] / gforth / stuff.fs  

gforth: gforth/stuff.fs

Diff for /gforth/stuff.fs between version 1.45 and 1.46

version 1.45, Sun Oct 2 11:30:32 2005 UTC version 1.46, Sat Nov 5 23:26:49 2005 UTC
Line 159 
Line 159 
     2dup find-name dup if ( c-addr u nt )      2dup find-name dup if ( c-addr u nt )
         nip nip name>comp          nip nip name>comp
         2dup [comp'] [[ d= if          2dup [comp'] [[ d= if
             2drop ['] compiler1 is parser1              2drop ['] compiler1 is parser1 ['] noop
         else          else
             ['] postpone,              ['] postpone,
         endif          endif


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

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help