Diff for /gforth/simp-see.fs between versions 1.1 and 1.2

version 1.1, 2001/03/28 09:06:57 version 1.2, 2002/12/13 21:20:39
Line 22  require see.fs Line 22  require see.fs
   
 : simple-see-range ( addr1 addr2 -- )  : simple-see-range ( addr1 addr2 -- )
     swap u+do      swap u+do
         cr i hex. i cell+ i @ .word drop          cr xpos off i hex. i cell+ i @ .word drop
         cell +loop          cell +loop
 ;  ;
   

Removed from v.1.1  
changed lines
  Added in v.1.2


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