Name: Anonymous 2007-08-03 6:53 ID:iG2tUgp9
/comp/ is to /prog/ as IT is to Computer Science
(defmacro for (var from init to final do &rest body)
(let ((tempvar (make-symbol "max")))
`(let ((,var ,init)
(,tempvar ,final))
(while (<= ,var ,tempvar)
,@body
(inc ,var)))))