Diff for /gforth/glocals.fs between versions 1.7 and 1.8

version 1.7, 1994/09/12 19:00:30 version 1.8, 1994/10/24 19:15:58
Line 509  forth definitions Line 509  forth definitions
  endif ; immediate   endif ; immediate
   
 : locals|  : locals|
   BEGIN  name 2dup s" |" compare 0=  WHILE      BEGIN
          (local)  REPEAT  drop 0 (local) ;  immediate restrict          name 2dup s" |" compare 0<>
       WHILE
           (local)
       REPEAT
       drop 0 (local) ;  immediate restrict

Removed from v.1.7  
changed lines
  Added in v.1.8


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