Languages with a slow edit/compile/link/test development loop tend to require sophisticated tracing/stepping debuggers to facilate debugging.
A much better (faster) way in fast-compiling languages is to add printing code at well-selected places, let the program run, look at the output, see where things went wrong, add more printing code, etc., until the bug is found.
The simple debugging aids provided in debugs.fs are meant to support this style of debugging.
~~ prints debugging information (by default the source
location and the stack contents). It is easy to insert. If you use Emacs
it is also easy to remove (C-x ~ in the Emacs Forth mode to
query-replace them with nothing). The deferred words
.debugline control the output of
~~. The default source location output format works well with
Emacs’ compilation mode, so you can step through the program at the
source level using C-x ` (the advantage over a stepping debugger
is that you can step in any direction and you know where the crash has
happened or where the strange data has occurred).
~~( – ) gforth-0.4 “tilde-tilde”
Prints the source code location of the
~~ and the stack
printdebugdata( – ) gforth-0.4 “print-debug-data”
.debugline( nfile nline – ) gforth-0.6 “print-debug-line”
Print the source code location indicated by nfile nline, and
additional debugging information; the default
prints the additional information with
debug-fid( – file-id ) gforth-1.0 “debug-fid”
~~ (and assertions) will usually print the wrong file name if a
marker is executed in the same file after their occurance. They will
print ‘*somewhere*’ as file name if a marker is executed in the
same file before their occurance.
once( – ) unknown “once”
do the following up to THEN only once
~~bt( – ) unknown “~~bt”
print stackdump and backtrace
~~1bt( – ) unknown “~~1bt”
print stackdump and backtrace once
???( – ) unknown “???”
Open a debuging shell
WTF??( – ) unknown “WTF??”
Open a debugging shell with backtrace and stack dump
!!FIXME!!( – ) unknown “!!FIXME!!”
word that should never be reached
replace-word( xt1 xt2 – ) gforth-1.0 “replace-word”
make xt2 do xt1, both need to be colon definitions
~~Variable( "name" – ) unknown “~~Variable”
Variable that will be watched on every access
~~Value( n "name" – ) unknown “~~Value”
Value that will be watched on every access
+ltrace( – ) unknown “+ltrace”
turn on line tracing
-ltrace( unknown ) unknown “-ltrace”
turn off line tracing
view( "name" – ) gforth-1.0 “view”
locate( "name" – ) gforth-1.0 “locate”
Show the source code of the word name and set the current location there.
edit( "name" – ) gforth-1.0 “edit”
Enter the editor at the location of "name"
#loc( nline nchar "file" – ) unknown “#loc”
set next word’s location to nline nchar in "file"