| The following Forth words can be used for debugging: | |
| debug <xt> - Mark word for debugging | |
| debug-off - Unmark all words for debugging | |
| resume - Return from subordinate Forth interpreter | |
| The source debugger also implements the following commands when it has been activated: | |
| Up - Unmark current word for debugging, mark parent and continue | |
| Down - Mark next word for debugging | |
| Trace - Continue execution until end of word displaying | |
| debug information | |
| Rstack - Display contents of the Rstack | |
| Forth - Launch subordinate Forth interpreter | |
| An example session: | |
| 0 > see boot | |
| : boot | |
| linefeed parse cr " platform-boot" $find if | |
| execute then | |
| 2drop cr " Booting " type type cr " ... not supported on this system." type cr | |
| ; | |
| ok | |
| 0 > debug boot | |
| Stepper keys: <space>/<enter> Up Down Trace Rstack Forth | |
| ok | |
| 0 > boot | |
| : boot ( Empty ) | |
| 00000000ffe26b08: linefeed ( a ) | |
| 00000000ffe26b10: parse ( ffec6e24 0 ) | |
| 00000000ffe26b18: cr | |
| ( ffec6e24 0 ) | |
| 00000000ffe26b20: (") ( ffec6e24 0 ffe26b30 d ) | |
| 00000000ffe26b40: $find ( ffec6e24 0 ffe31710 ffffffffffffffff ) | |
| 00000000ffe26b48: do?branch ( ffec6e24 0 ffe31710 ) | |
| 00000000ffe26b58: execute [sparc64] Booting file 'cdrom' with parameters '' | |
| Not a bootable ELF image | |
| Not a Linux kernel image | |
| Not a bootable a.out image | |
| Loading FCode image... | |
| Loaded 5936 bytes | |
| entry point is 0x4000 | |
| Evaluating FCode... | |
| open isn't unique. | |
| Boot load failed. | |
| ( Empty ) | |
| 00000000ffe26b60: dobranch ( Empty ) | |
| 00000000ffe26bf8: (semis) | |
| [ Finished boot ] ok | |
| 0 > |