SPY: SPY-EXIT SPY_OFF
SPY:
* SPY: ( name -- )

create a header for a nesting word and go to compiling
mode then. This word is usually ended with ; but
the execution of the resulting colon-word can also
return with EXIT
this is the spy-version >SPY_ON

with_spy defining primitive