* ;SPY ( -- ) compiles ((;)) which does EXIT the current colon-definition. It does then end compile-mode and returns to execute-mode. See : and :NONAME
;SPY
( -- )
((;))
EXIT
:
:NONAME
with_spy compiling primitive