RETRO Glossary


while

Data: q-
Addr: -
Float: -

Execute quote repeatedly while the quote returns a `TRUE` value. The quote should return a flag of either `TRUE` or `FALSE`, though `while` will treat any non-zero value as `TRUE`.

Class: class:word
Namespace: global
Interface Layer: all

Example:

#10 [ dup n:put nl n:dec dup n:-zero? ] while