X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Flow.lisp;fp=src%2Fpcl%2Flow.lisp;h=53c744dc19a019c224beae9916e451b391a24384;hb=96aa790ea1d70810e862665c3c8be4ce405a964c;hp=2a333d0d68cf47d25edd1401a40f89002d8b467d;hpb=43a526583b7015e6b9945d16e31da72fda1325f5;p=sbcl.git diff --git a/src/pcl/low.lisp b/src/pcl/low.lisp index 2a333d0..53c744d 100644 --- a/src/pcl/low.lisp +++ b/src/pcl/low.lisp @@ -92,8 +92,7 @@ (for-std-class-p t)) (:constructor make-wrapper-internal) (:copier nil)) - (instance-slots-layout nil :type list) - (class-slots nil :type list)) + (slots () :type list)) #-sb-fluid (declaim (sb-ext:freeze-type wrapper)) ;;;; PCL's view of funcallable instances