* ABORT ( -- ) no-return throw - cleanup some things and go back to the QUIT routine : ABORT -1 THROW ;
ABORT
( -- )
no-return
: ABORT -1 THROW ;
exception ordinary primitive