* 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.
UNLOOP
( -- )
>DO
>LOOP
>EXIT
core ordinary primitive