signal errors for bad initialization of slot definitions

[sbcl.git] / src / pcl / early-low.lisp

diff --git a/src/pcl/early-low.lisp b/src/pcl/early-low.lisp
index cbe9c77..3821cfc 100644 (file)
--- a/src/pcl/early-low.lisp
+++ b/src/pcl/early-low.lisp
@@ -113,6 +113,7 @@
                   *the-class-global-writer-method*
                   *the-class-global-boundp-method*
                   *the-class-standard-generic-function*
+                  *the-class-standard-direct-slot-definition*
                   *the-class-standard-effective-slot-definition*
 
                   *the-eslotd-standard-class-slots*