X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Fdescribe.lisp;h=d9a4e2b5e1cae396b969d521338d86c23b2c61cf;hb=204f2fa9771ad9e55718dc76205afec7d11b3011;hp=998d45c79dd469dc6b145e90c9093d8f3f6dcdf9;hpb=59f7d9254f3601cfd48f0c299d5c30562111e991;p=sbcl.git

diff --git a/src/pcl/describe.lisp b/src/pcl/describe.lisp
index 998d45c..d9a4e2b 100644
--- a/src/pcl/describe.lisp
+++ b/src/pcl/describe.lisp
@@ -26,6 +26,8 @@
 
 (in-package "SB-PCL")
 
+(declaim #.*optimize-byte-compilation*)
+
 (defmethod slots-to-inspect ((class slot-class) (object slot-object))
   (class-slots class))