unloop ( -- )

publication: 23 janvier 2022 / mis à jour 9 novembre 2024

Arrête une action do..loop. Utiliser unloop avant exit seulement dans une structure do..loop.

: example ( -- ) 
    100 0 do 
        cr i . 
        key bl = if 
            unloop exit 
        then 
    loop 
  ;

Legal: site web personnel sans commerce / personal site without seling