X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fconstantp.lisp;h=29252c2ae5c8634647ca18365e6b271cd81312ad;hb=45bc305be4e269d2e1a477c8e0ae9a64df1ccd1c;hp=0e2f4af8be975a0bff9b251531695ed4d20ba97b;hpb=0ca182b2e0fd9a7fc8005bef9d21000b326208fc;p=sbcl.git

diff --git a/src/compiler/constantp.lisp b/src/compiler/constantp.lisp
index 0e2f4af..29252c2 100644
--- a/src/compiler/constantp.lisp
+++ b/src/compiler/constantp.lisp
@@ -145,7 +145,7 @@ constantness of the FORM in ENVIRONMENT."
                   ;; instead of general (not handling cases like &key (x y))
                   (declare (ignorable
                             ,@(remove-if (lambda (arg)
-                                           (member arg lambda-list-keywords))
+                                           (member arg sb!xc:lambda-list-keywords))
                                          lambda-list)))
                    ,body))))
       `(progn