Diff for /gforth/kernel/tools.fs between versions 1.27 and 1.28

version 1.27, 2007/12/31 18:40:26 version 1.28, 2011/08/10 12:16:09
Line 27  hex Line 27  hex
   
 \ .S            CORE / CORE EXT                         9may93jaw  \ .S            CORE / CORE EXT                         9may93jaw
   
   
   defer .s.
   ' . is .s.
   
 variable maxdepth-.s ( -- addr ) \ gforth maxdepth-dot-s  variable maxdepth-.s ( -- addr ) \ gforth maxdepth-dot-s
 \G A variable containing 9 by default.  @code{.s} and @code{f.s}  \G A variable containing 9 by default.  @code{.s} and @code{f.s}
 \G display at most that many stack items.  \G display at most that many stack items.
Line 40  variable maxdepth-.s ( -- addr ) \ gfort Line 44  variable maxdepth-.s ( -- addr ) \ gfort
     depth 0 max maxdepth-.s @ min      depth 0 max maxdepth-.s @ min
     dup 0      dup 0
     ?do      ?do
         dup i - pick .          dup i - pick .s.
     loop      loop
     drop ;      drop ;
   

Removed from v.1.27  
changed lines
  Added in v.1.28


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