do-until

Purpose
Evaluates form and then test-form repeatedly, as long as test-form evaluates to nil.

Package   :gbbopen-tools

Module   :gbbopen-tools

Arguments and values

See also
    do-while
    until
    while

Examples

  > (let ((i 0)) 
      (do-until (print i)
          (> (incf i) 3)))
  1 
  2 
  3 
  nil
  > (let ((i 10)) 
      (do-until (print i)
          (> (incf i) 3)))
  10
  nil
  >

do-until