EXIT EXECUTES EXIT
EXIT
* 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 ;

FORTH/ANS core (dpANS.6.1.1380) compiling primitive