X-Git-Url: https://git.distorted.org.uk/~mdw/lisp/blobdiff_plain/0ff9df03bb54ba792cefa551face51748ae34259..fe0f07ea19b36ce1abc1ec305d0203323cbf2316:/anaphora.lisp diff --git a/anaphora.lisp b/anaphora.lisp index 9d5ccd2..0b8cd3e 100644 --- a/anaphora.lisp +++ b/anaphora.lisp @@ -23,12 +23,12 @@ ;;; along with this program; if not, write to the Free Software Foundation, ;;; Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. -(defpackage #:mdw.anaphora +(defpackage #:anaphora (:use #:common-lisp) (:export #:it #:aif #:aif2 #:awhen #:awhen2 #:aand #:awhile #:asetf #:acond)) -(in-package #:mdw.anaphora) +(in-package #:anaphora) (defmacro aif (cond then &optional else) "Bind `it' to result of COND when evaluating THEN or ELSE."