* SPY-EXIT ( -- ) will unnest the current colon-word so it will actually return the word calling it. This can be found in the middle of a colon-sequence between : and ;
SPY-EXIT
( -- )
:
;
with_spy ordinary primitive