catch

 execute the XT and restore stack frame if an exception is thrown

Stackeffects

( xt -- )
R( -- ) or R( ny -- )

Definition

: catch
   sp@    >r    handler    @    >r    rp@    handler    !    execute    r>    handler    !    r>    drop    0
;

Used by

quit