Re: combinations not working

On Mon, 01 Jan 2007 12:32:32 +0100, John Thingstad <john.thingstad@xxxxxxxxx> wrote:

(defmacro with-permuting-vector ((var vector &optional return) &body body)
`(let ((,var ,vector))
(forall-combinations ,var (lambda (,var) ,@body ,return))))


Oops! The &optional argument was added as a afterthought without testing.
Looking at it is should be:

(defmacro with-permuting-vector ((var vector &optional return) &body body)
`(let ((,var ,vector))
(forall-combinations ,var (lambda (,var) ,@body))
,return))

--
Using Opera's revolutionary e-mail client: http://www.opera.com/mail/
.