UNLOOP
* UNLOOP ( -- )

drop the DO .. LOOP runtime variables from the return-stack,
usually used just in before an EXIT call. Using this multiple
times can unnest multiple nested loops.

FORTH/ANS core (dpANS.6.1.2380) compiling primitive