Re: loop macro and multiple-value-bind

Iterate is a more lispy superset of loop. For instance you can do this:
(iter
  (for a from 10 to 20)
  (for (values q r) = (truncate a 3))
  (format t "~d ~d~%" q r))
3 1
3 2
4 0
4 1
4 2
5 0
5 1
5 2
6 0
6 1
6 2

Gauche Scheme

(use srfi-197) ;; chain-lambda

(for-each
  (chain-lambda (div-and-mod _ 3) (format #t "~d ~d~%" _ _))
  (iota 11 10))

3 1
3 2
4 0
4 1
4 2
5 0
5 1
5 2
6 0
6 1
6 2