do

[syntax] do ((variable init step) ...) (test expr ...) command ...

R5RS