WHILE WARRANTY WITHIN
WHILE ( cond -- )  
smart-word ansi .6.1.2430 <CORE>
middle part of a BEGIN .. WHILE .. REPEAT control-loop - if cond is true the code-piece up to REPEAT is executed which will then jump back to BEGIN - and if the cond is null then WHILE will branch to right after the REPEAT (compare with UNTIL that forms a BEGIN .. UNTIL loop)

reference: p4_while in ../src/core.c:1872, export CS WHILE