do-while

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

Package   :gbbopen-tools

Module   :gbbopen-tools

Arguments and values

See also
    do-until
    until
    while

Examples

  > (let ((i 0)) 
      (do-while (print i)
          (<= (incf i) 3)))
  1 
  2 
  3 
  nil
  > (let ((i 10)) 
      (do-while (print i)
          (<= (incf i) 3)))
  10
  nil
  >

do-while