X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fmacros.lisp;h=9d331bf7ba154810d5260750ac23990de622395b;hb=fe962ba01d267b92f638c8f0d19be41054219f04;hp=015768c573fa848fef55ac6a515b1fe0ab12fd30;hpb=8bcffb407835ff680d5ee2ba1f7ce97839bbae3e;p=sbcl.git

diff --git a/src/compiler/macros.lisp b/src/compiler/macros.lisp
index 015768c..9d331bf 100644
--- a/src/compiler/macros.lisp
+++ b/src/compiler/macros.lisp
@@ -456,7 +456,7 @@
 ;;; keywords specify the initial values for various optimizers that
 ;;; the function might have.
 (defmacro defknown (name arg-types result-type &optional (attributes '(any))
-                    &rest keys)
+                    &body keys)
   (when (and (intersection attributes '(any call unwind))
              (intersection attributes '(movable)))
     (error "function cannot have both good and bad attributes: ~S" attributes))