There's  a package for Common Lisp that implements an iter construct that is, basically, the whole CL `loop' but with a more lispy syntax.