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

version 1.48, 2002/05/28 08:54:27 version 1.49, 2002/09/14 08:20:19
Line 685  interpret/compile: TO ( c|w|d|r "name" - Line 685  interpret/compile: TO ( c|w|d|r "name" -
     \ don't use 'locals|'! use '{'! A portable and free '{'      \ don't use 'locals|'! use '{'! A portable and free '{'
     \ implementation is compat/anslocals.fs      \ implementation is compat/anslocals.fs
     BEGIN      BEGIN
         name 2dup s" |" compare 0<>          name 2dup s" |" str= 0=
     WHILE      WHILE
         (local)          (local)
     REPEAT      REPEAT

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


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