X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fmacros.lisp;h=e51c8eb3f3aa4a65f6e613a0f5102d00e07eccba;hb=683874b497a99cd2c11b6c5d9b47e2785b1ede5f;hp=54c4073a3919dcb6225b2da5871a9420af18a09d;hpb=1a6def3955b715472eb2c75b15660912b9f90173;p=sbcl.git

diff --git a/src/compiler/macros.lisp b/src/compiler/macros.lisp
index 54c4073..e51c8eb 100644
--- a/src/compiler/macros.lisp
+++ b/src/compiler/macros.lisp
@@ -100,7 +100,7 @@
 ;;; If the desirability of the transformation depends on the current
 ;;; OPTIMIZE parameters, then the POLICY macro should be used to
 ;;; determine when to pass.
-(defmacro def-source-transform (name lambda-list &body body)
+(defmacro define-source-transform (name lambda-list &body body)
   (let ((fn-name
 	 (if (listp name)
 	     (collect ((pieces))