SJS wrote:
begin quoting David Brown as of Thu, Jan 10, 2008 at 10:23:26PM -0800:
(defconstant solved-board (let ((nums (loop for i from 1 to full-size collect (and (< i full-size) i)))) (make-array full-size :initial-contents nums)) "The final solved board")
While I have no problem with this, lisp-niks would not approve of your use of loop.
-a -- [email protected] http://www.kernel-panic.org/cgi-bin/mailman/listinfo/kplug-lpsg
