while

(while test expression...)

Repeats the expressions while the test is not nil. Returns the value of the last expression evaluated.

(setq i 0)
(while (< i 3) (setq i (1+ i)))   ; 3