[gforth] / gforth / glocals.fs  

gforth: gforth/glocals.fs

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

version 1.7, Mon Sep 12 19:00:30 1994 UTC version 1.8, Mon Oct 24 19:15:58 1994 UTC
Line 509 
Line 509 
  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


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

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help