Entries from 2010-04-14 to 1 day
(defmacro alambda (params &body body) `(labels ((self ,params ,@body)) #'self)) (defmacro aif (test-form then-form &optional else-form) `(let ((it ,test-form)) (if it ,then-form ,else-form))) (defun numlist-from-string (s) (loop for i from…