* DEBUG ( 'word' -- )

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)

debug ordinary primitive