pfe-debug-ext ? Debugger words
DEBUG ( "word" -- ) ?=>? ( | ) ; | ? |
"FORTH"
;NO-DEBUG ( "word" -- ) ?=>? ( | ) ; | ? |
"FORTH"
;(SEE) ?=>? ( | ) ; | ? |
"FORTH"
;ADDR>NAME ( word-addr* -- word-nfa*!' | 0 ) ?=>? ( | ) ; | ? |
"FORTH"
;COME_BACK ( -- ) ?=>? ( | ) ; | ? |
"FORTH"
;
DEBUG ( "word" -- ) [FTH] => "FORTH"
this word will place an debug-runtime into
the CFA
of the following word. If the
word gets executed later, the user will
be prompted and can decide to single-step
the given word. The debug-stepper is
interactive and should be self-explanatory.
(use NO-DEBUG
to turn it off again)
NO-DEBUG ( "word" -- ) [FTH] => "FORTH"
the inverse of " DEBUG
word "
(SEE) - no description, sorry
ADDR>NAME ( word-addr* -- word-nfa*!' | 0 ) [FTH] => "FORTH"
search the next corresponding namefield that address is next too. If it is not in the base-dictionary, then just return 0 as not-found.
COME_BACK ( -- ) [FTH] => "FORTH"
show the return stack before last exception
along with the best names as given by ADDR>NAME