Interpretation semantics for this word are undefined.
Execution:
( -- )
( R: loop-sys -- )
Discard the current loop control parameters. An ambiguous condition
exists if they are unavailable. Continue execution immediately
following the innermost syntactically enclosing
DO...LOOP or DO...+LOOP.
Note that LEAVE immediately exits the loop. No words
following LEAVE within the loop will be executed.
Typical use:
:X ... DO
... IF
... LEAVETHEN ... LOOP ...
;