макры рулят

[lomeo]

Guy Lapalme.  Implementation of a "Lisp comprehension" macro.

Вот что делают!

(defun perms (x)
    (if (null x) ’(())
        [(cons a p) (a <- x) (p <- (perms (remove a x :count 1)))]))

via lispnik