* UNTIL ( cond -- ) ends an control-loop, see >BEGIN and compare with >WHILE
UNTIL
( cond -- )
>BEGIN
>WHILE
core compiling primitive