diff --git a/pcl/boot.lisp b/pcl/boot.lisp
index e802a4d9a584eee8f3a9c46252d866f1f8656de1..0e2ca6aa3ef98aeb4188c687a52707b058bf65ea 100644
--- a/pcl/boot.lisp
+++ b/pcl/boot.lisp
@@ -1367,7 +1367,7 @@ work during bootstrapping.
 (defmacro with-slots (slots instance &body body)
   (let ((in (gensym)))
     `(let ((,in ,instance))
-       #+cmu (declare (ext:ignorable ,in))
+       #+cmu (declare (ignorable ,in))
        ,@(and (symbolp instance)
 	      `((declare (variable-rebinding ,in ,instance))
        (symbol-macrolet ,(mapcar #'(lambda (slot-entry)
@@ -1387,7 +1387,7 @@ work during bootstrapping.
 (defmacro with-accessors (slots instance &body body)
   (let ((in (gensym)))
     `(let ((,in ,instance))
-       #+cmu (declare (ext:ignorable ,in))
+       #+cmu (declare (ignorable ,in))
        ,@(and (symbolp instance)
 	      `((declare (variable-rebinding ,in ,instance))
        (symbol-macrolet ,(mapcar #'(lambda (slot-entry)