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