| |
|
| : .s ( -- ) \ tools dot-s |
: .s ( -- ) \ tools dot-s |
| \G Display the number of items on the data stack, |
\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 .r ." > " |
| depth 0 max maxdepth-.s @ min |
depth 0 max maxdepth-.s @ min |
| dup 0 |
dup 0 |
| dup .4 space .4 ." - " .4 space .4 drop 10 /dump +! space .chars ; |
dup .4 space .4 ." - " .4 space .4 drop 10 /dump +! space .chars ; |
| |
|
| : dump ( addr u -- ) \ tools dump |
: 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 displays the contents of 16 bytes. When Gforth is running under |
| \G an operating system you may get @file{Invalid memory address} errors |
\G an operating system you may get @file{Invalid memory address} errors |
| \G if you attempt to access arbitrary locations. |
\G if you attempt to access arbitrary locations. |
| \ ? 17may93jaw |
\ ? 17may93jaw |
| |
|
| : ? ( a-addr -- ) \ tools question |
: ? ( 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 |
\ words visible in roots 14may93py |
