Diff for /gforth/kernel/require.fs between versions 1.20 and 1.23

version 1.20, 2002/04/27 14:52:32 version 1.23, 2003/01/20 17:07:42
Line 60  create image-included-files 4 , A, ( poi Line 60  create image-included-files 4 , A, ( poi
     \G @file{./foo.fs}      \G @file{./foo.fs}
     included-files 2@ 0      included-files 2@ 0
     ?do ( c-addr u addr )      ?do ( c-addr u addr )
         dup >r 2@ 2over compare 0=          dup >r 2@ 2over str=
         if          if
             2drop rdrop unloop              2drop rdrop unloop
             true EXIT              true EXIT

Removed from v.1.20  
changed lines
  Added in v.1.23


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