--- gforth/kernel/tools.fs 1999/02/03 00:10:26 1.7 +++ gforth/kernel/tools.fs 1999/03/23 20:24:27 1.10 @@ -29,7 +29,7 @@ variable maxdepth-.s : .s ( -- ) \ tools dot-s \G Display the number of items on the data stack, - \G followed by a list of the items; TOS is the right-most item + \G followed by a list of the items; TOS is the right-most item. ." <" depth 0 .r ." > " depth 0 max maxdepth-.s @ min dup 0 @@ -45,7 +45,7 @@ Variable /dump : .4 ( addr -- addr' ) 3 FOR -1 /dump +! /dump @ 0< - IF ." " ELSE dup c@ 0 <# # # #> type space THEN + IF ." " ELSE dup c@ 0 <<# # # #> type #>> space THEN char+ NEXT ; : .chars ( addr -- ) /dump @ bounds @@ -57,7 +57,7 @@ Variable /dump dup .4 space .4 ." - " .4 space .4 drop 10 /dump +! space .chars ; : dump ( addr u -- ) \ tools dump - \G Display u lines of memory starting at address addr. Each line + \G Display @var{u} lines of memory starting at address @var{addr}. Each line \G displays the contents of 16 bytes. When Gforth is running under \G an operating system you may get @file{Invalid memory address} errors \G if you attempt to access arbitrary locations. @@ -70,7 +70,7 @@ Variable /dump \ ? 17may93jaw : ? ( a-addr -- ) \ tools question - \G Display the contents of address a-addr in the current number base. + \G Display the contents of address @var{a-addr} in the current number base. @ . ; \ words visible in roots 14may93py