X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Fdefs.lisp;h=2bdeb0526a64d20e78077d86b2633692de6ccf0a;hb=64a7331285b0eab2c216f52670763c7d192cfdaa;hp=dc12f8469dd5446933cee40be968c140fabc6ee3;hpb=83e5661ae59addac315e6754013b3887b477570f;p=sbcl.git diff --git a/src/pcl/defs.lisp b/src/pcl/defs.lisp index dc12f84..2bdeb05 100644 --- a/src/pcl/defs.lisp +++ b/src/pcl/defs.lisp @@ -559,10 +559,7 @@ :accessor class-direct-slots) (slots :initform () - :accessor class-slots) - (initialize-info - :initform nil - :accessor class-initialize-info))) + :accessor class-slots))) ;;; The class STD-CLASS is an implementation-specific common ;;; superclass of the classes STANDARD-CLASS and