0.6.11.45:

[sbcl.git] / src / pcl / describe.lisp

diff --git a/src/pcl/describe.lisp b/src/pcl/describe.lisp
index 0356fe6..d9a4e2b 100644 (file)
--- a/src/pcl/describe.lisp
+++ b/src/pcl/describe.lisp
@@ -26,8 +26,7 @@
 
 (in-package "SB-PCL")
 
-;; byte-compile this file
-(declaim (optimize (speed 0) (safety 1)))
+(declaim #.*optimize-byte-compilation*)
 
 (defmethod slots-to-inspect ((class slot-class) (object slot-object))
   (class-slots class))