Diff for /gforth/locals-test.fs between versions 1.6 and 1.9

version 1.6, 1995/01/25 18:53:50 version 1.9, 1997/10/04 17:33:53
Line 1 Line 1
 include glocals.fs  require glocals.fs
 include debugging.fs  require debugs.fs
   
 : localsinfo \ !! only debugging  : localsinfo \ !! only debugging
  ." stack: " .s ." locals-size: " locals-size ? ." locals-list"   ." stack: " .s ." locals-size: " locals-size ? ." locals-list"
Line 302  cr Line 302  cr
   
 : test  : test
     1 { a }  ." after }" cr      1 { a }  ." after }" cr
     2 { b -- } ." after --" cr      2 { b -- }  ." after --" cr
 ;  ;
   test
 .s cr  .s cr
   
 bye  bye

Removed from v.1.6  
changed lines
  Added in v.1.9


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