Immediately stops execution, resets data stack, resets return stack and returns to command line. No message is issued.

: TEST ( -- )
  CR ." Press S to stop" CR
  BEGIN
    42 EMIT
    KEY? ASCII S = IF ABORT THEN
  AGAIN
;

none