/[gcl]/gcl/pcl/sys-proclaim.lisp
ViewVC logotype

Diff of /gcl/pcl/sys-proclaim.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by camm, Tue Sep 23 21:48:34 2003 UTC revision 1.3 by camm, Fri Oct 10 03:35:54 2003 UTC
# Line 1  Line 1 
1    
2  (IN-PACKAGE "PCL")  (IN-PACKAGE "PCL")
 (PROCLAIM '(FTYPE (FUNCTION (FIXNUM) T) POWER-OF-TWO-CEILING))  
 (PROCLAIM  
     '(FTYPE (FUNCTION (T) FUNCTION) CACHE-LIMIT-FN METHOD-CALL-FUNCTION  
             FAST-METHOD-CALL-FUNCTION))  
 (PROCLAIM '(FTYPE (FUNCTION (T) FIELD-TYPE) CACHE-FIELD))  
3  (PROCLAIM  (PROCLAIM
4      '(FTYPE (FUNCTION (T) FIXNUM) ONE-INDEX-LIMIT-FN      '(FTYPE (FUNCTION (T) FIXNUM) ONE-INDEX-LIMIT-FN
5              N-N-ACCESSORS-LIMIT-FN CHECKING-LIMIT-FN PV-CACHE-LIMIT-FN              N-N-ACCESSORS-LIMIT-FN CHECKING-LIMIT-FN PV-CACHE-LIMIT-FN
6              ARG-INFO-NUMBER-REQUIRED DEFAULT-LIMIT-FN CACHE-COUNT              ARG-INFO-NUMBER-REQUIRED DEFAULT-LIMIT-FN CACHE-COUNT
7              CACHING-LIMIT-FN PV-TABLE-PV-SIZE EARLY-CLASS-SIZE              CACHING-LIMIT-FN PV-TABLE-PV-SIZE EARLY-CLASS-SIZE
8              CPD-COUNT FAST-INSTANCE-BOUNDP-INDEX))              CPD-COUNT FAST-INSTANCE-BOUNDP-INDEX))
9    (PROCLAIM '(FTYPE (FUNCTION (T) FIELD-TYPE) CACHE-FIELD))
10    (PROCLAIM
11        '(FTYPE (FUNCTION (T) FUNCTION) CACHE-LIMIT-FN METHOD-CALL-FUNCTION
12                FAST-METHOD-CALL-FUNCTION))
13    (PROCLAIM '(FTYPE (FUNCTION (FIXNUM) T) POWER-OF-TWO-CEILING))
14  (PROCLAIM  (PROCLAIM
15      '(FTYPE (FUNCTION (T) LIST) CACHE-OVERFLOW PV-TABLE-SLOT-NAME-LISTS      '(FTYPE (FUNCTION (T) LIST) CACHE-OVERFLOW PV-TABLE-SLOT-NAME-LISTS
16              PV-TABLE-CALL-LIST))              PV-TABLE-CALL-LIST))
# Line 23  Line 23 
23  (PROCLAIM  (PROCLAIM
24      '(FTYPE (FUNCTION (FIXNUM FIXNUM T) FIXNUM)      '(FTYPE (FUNCTION (FIXNUM FIXNUM T) FIXNUM)
25              COMPUTE-PRIMARY-CACHE-LOCATION))              COMPUTE-PRIMARY-CACHE-LOCATION))
 (PROCLAIM '(FTYPE (FUNCTION (T) (INTEGER 1 512)) CACHE-LINE-SIZE))  
26  (PROCLAIM '(FTYPE (FUNCTION (T) (INTEGER 1 256)) CACHE-NKEYS))  (PROCLAIM '(FTYPE (FUNCTION (T) (INTEGER 1 256)) CACHE-NKEYS))
27    (PROCLAIM '(FTYPE (FUNCTION (T) (INTEGER 1 512)) CACHE-LINE-SIZE))
28  (PROCLAIM '(FTYPE (FUNCTION (T) (OR CACHE NULL)) PV-TABLE-CACHE))  (PROCLAIM '(FTYPE (FUNCTION (T) (OR CACHE NULL)) PV-TABLE-CACHE))
29  (PROCLAIM  (PROCLAIM
     '(FTYPE (FUNCTION (T T *) *) GET-EFFECTIVE-METHOD-FUNCTION  
             MAKE-N-N-ACCESSOR-DFUN MAKE-CHECKING-DFUN LOAD-DEFGENERIC  
             TYPES-FROM-ARGUMENTS MAKE-DEFAULT-INITARGS-FORM-LIST  
             MAKE-FINAL-ACCESSOR-DFUN MAKE-ACCESSOR-TABLE  
             GET-SIMPLE-INITIALIZATION-FUNCTION  
             GET-COMPLEX-INITIALIZATION-FUNCTIONS  
             COMPUTE-SECONDARY-DISPATCH-FUNCTION SLOT-VALUE-OR-DEFAULT  
             MAKE-EFFECTIVE-METHOD-FUNCTION NESTED-WALK-FORM))  
 (PROCLAIM  
     '(FTYPE (FUNCTION (T T T T *) *)  
             MAKE-EFFECTIVE-METHOD-FUNCTION-SIMPLE1  
             ITERATE::RENAME-LET-BINDINGS))  
 (PROCLAIM  
     '(FTYPE (FUNCTION (T T T *) *) MAKE-ONE-INDEX-ACCESSOR-DFUN  
             WALKER::WALK-DECLARATIONS GET-SECONDARY-DISPATCH-FUNCTION))  
 (PROCLAIM '(FTYPE (FUNCTION (T T T T T T *) *) REAL-MAKE-A-METHOD))  
 (PROCLAIM  
     '(FTYPE (FUNCTION (T T T T T T) *) MEMF-CODE-CONVERTER  
             CACHE-MISS-VALUES-INTERNAL  
             GENERATE-DISCRIMINATION-NET-INTERNAL  
             MAKE-LONG-METHOD-COMBINATION-FUNCTION  
             DO-SHORT-METHOD-COMBINATION  
             |(FAST-METHOD (SETF SLOT-VALUE-USING-CLASS) (T STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|))  
 (PROCLAIM  
     '(FTYPE (FUNCTION (T T T T) *)  
             |(FAST-METHOD ALLOCATE-INSTANCE (STRUCTURE-CLASS))|  
             |(FAST-METHOD MAKE-INSTANCE (SYMBOL))|  
             |(FAST-METHOD DEFAULT-INITARGS (SLOT-CLASS T))|  
             |(FAST-METHOD INITIALIZE-INSTANCE (SLOT-OBJECT))|  
             |(FAST-METHOD DESCRIBE-OBJECT (T T))|  
             |(FAST-METHOD DESCRIBE-OBJECT (SLOT-OBJECT T))|  
             |(FAST-METHOD SLOTS-TO-INSPECT (SLOT-CLASS SLOT-OBJECT))|  
             |(FAST-METHOD DESCRIBE-OBJECT (STANDARD-GENERIC-FUNCTION T))|  
             |(FAST-METHOD DESCRIBE-OBJECT (CLASS T))|  
             |(FAST-METHOD COMPUTE-APPLICABLE-METHODS-USING-CLASSES (GENERIC-FUNCTION T))|  
             GET-ACCESSOR-FROM-SVUC-METHOD-FUNCTION  
             |(FAST-METHOD SLOT-ACCESSOR-FUNCTION (EFFECTIVE-SLOT-DEFINITION T))|  
             BOOTSTRAP-ACCESSOR-DEFINITION GET-ACCESSOR-METHOD-FUNCTION  
             EMIT-CHECKING-OR-CACHING EMIT-CHECKING-OR-CACHING-FUNCTION  
             SETF-SLOT-VALUE-USING-CLASS-DFUN LOAD-SHORT-DEFCOMBIN  
             INITIALIZE-INSTANCE-SIMPLE-FUNCTION  
             MAKE-SHARED-INITIALIZE-FORM-LIST  
             MAKE-ONE-CLASS-ACCESSOR-DFUN  
             MAKE-FINAL-ONE-INDEX-ACCESSOR-DFUN SET-CLASS-SLOT-VALUE-1  
             MAKE-FINAL-CHECKING-DFUN ACCESSOR-VALUES  
             GENERATE-DISCRIMINATION-NET REAL-MAKE-METHOD-LAMBDA  
             ORDER-SPECIALIZERS ACCESSOR-MISS  
             |(FAST-METHOD REINITIALIZE-INSTANCE :AFTER (SLOT-CLASS))|  
             |(FAST-METHOD DOCUMENTATION (STANDARD-SLOT-DEFINITION))|  
             |(FAST-METHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION (SLOT-CLASS T))|  
             |(FAST-METHOD NO-APPLICABLE-METHOD (T))|  
             |(FAST-METHOD CHANGE-CLASS (T SYMBOL))|  
             |(FAST-METHOD CLASS-SLOT-VALUE (STD-CLASS T))|  
             |(FAST-METHOD LEGAL-QUALIFIERS-P (STANDARD-METHOD T))|  
             |(FAST-METHOD LEGAL-SPECIALIZERS-P (STANDARD-METHOD T))|))  
 (PROCLAIM  
     '(FTYPE (FUNCTION (T T T T T T T) *)  
             |(FAST-METHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS (STANDARD-OBJECT T T T))|  
             ITERATE::ITERATE-TRANSFORM-BODY))  
 (PROCLAIM  
30      '(FTYPE (FUNCTION (T T T T T) *)      '(FTYPE (FUNCTION (T T T T T) *)
31                |(FAST-METHOD (SETF SLOT-ACCESSOR-FUNCTION) (T EFFECTIVE-SLOT-DEFINITION T))|
32                MAKE-TWO-CLASS-ACCESSOR-DFUN
33                |(FAST-METHOD CHANGE-CLASS (T SYMBOL))|
34              |(FAST-METHOD COMPUTE-EFFECTIVE-METHOD (GENERIC-FUNCTION LONG-METHOD-COMBINATION T))|              |(FAST-METHOD COMPUTE-EFFECTIVE-METHOD (GENERIC-FUNCTION LONG-METHOD-COMBINATION T))|
35              |(FAST-METHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS (STANDARD-OBJECT STANDARD-OBJECT))|              |(FAST-METHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS (STANDARD-OBJECT STANDARD-OBJECT))|
             |(FAST-METHOD SHARED-INITIALIZE (SLOT-OBJECT T))|  
36              COMPUTE-DISCRIMINATING-FUNCTION-ARGLIST-INFO-INTERNAL              COMPUTE-DISCRIMINATING-FUNCTION-ARGLIST-INFO-INTERNAL
37              ADD-METHOD-DECLARATIONS WALK-METHOD-LAMBDA              ADD-METHOD-DECLARATIONS WALK-METHOD-LAMBDA
             MAKE-TWO-CLASS-ACCESSOR-DFUN  
             |(FAST-METHOD (SETF SLOT-ACCESSOR-FUNCTION) (T EFFECTIVE-SLOT-DEFINITION T))|  
             |(FAST-METHOD SHARED-INITIALIZE :AFTER (CLASS-EQ-SPECIALIZER T))|  
38              |(FAST-METHOD SHARED-INITIALIZE :AFTER (EQL-SPECIALIZER T))|              |(FAST-METHOD SHARED-INITIALIZE :AFTER (EQL-SPECIALIZER T))|
39              |(FAST-METHOD SHARED-INITIALIZE :BEFORE (CLASS T))|              |(FAST-METHOD SHARED-INITIALIZE :BEFORE (CLASS T))|
40              |(FAST-METHOD (SETF DOCUMENTATION) (T STANDARD-SLOT-DEFINITION))|              |(FAST-METHOD (SETF DOCUMENTATION) (T STANDARD-SLOT-DEFINITION))|
# Line 108  Line 47 
47              |(FAST-METHOD SHARED-INITIALIZE :AFTER (STANDARD-SLOT-DEFINITION T))|              |(FAST-METHOD SHARED-INITIALIZE :AFTER (STANDARD-SLOT-DEFINITION T))|
48              |(FAST-METHOD SHARED-INITIALIZE :BEFORE (STANDARD-METHOD T))|              |(FAST-METHOD SHARED-INITIALIZE :BEFORE (STANDARD-METHOD T))|
49              |(FAST-METHOD SHARED-INITIALIZE :AFTER (STANDARD-ACCESSOR-METHOD T))|              |(FAST-METHOD SHARED-INITIALIZE :AFTER (STANDARD-ACCESSOR-METHOD T))|
50              |(FAST-METHOD SHARED-INITIALIZE :BEFORE (STANDARD-GENERIC-FUNCTION T))|))              |(FAST-METHOD SHARED-INITIALIZE :BEFORE (STANDARD-GENERIC-FUNCTION T))|
51                |(FAST-METHOD SHARED-INITIALIZE :AFTER (CLASS-EQ-SPECIALIZER T))|
52                |(FAST-METHOD COMPUTE-EFFECTIVE-METHOD :AROUND (GENERIC-FUNCTION METHOD-COMBINATION T))|))
53  (PROCLAIM  (PROCLAIM
54      '(FTYPE (FUNCTION (T T T) *) OPTIMIZE-SLOT-VALUE-BY-CLASS-P      '(FTYPE (FUNCTION (T T T) *)
55              ACCESSOR-VALUES1 EMIT-READER/WRITER              |(FAST-METHOD CLASS-PROTOTYPE (STRUCTURE-CLASS))|
56              EMIT-ONE-OR-N-INDEX-READER/WRITER GENERATING-LISP              |(FAST-METHOD MAKE-INSTANCES-OBSOLETE (SYMBOL))|
57              EMIT-READER/WRITER-FUNCTION              |(FAST-METHOD METHOD-FUNCTION (STANDARD-METHOD))|
58                |(FAST-METHOD COMPUTE-DISCRIMINATING-FUNCTION-ARGLIST-INFO (STANDARD-GENERIC-FUNCTION))|
59                GET-OPTIMIZED-STD-SLOT-VALUE-USING-CLASS-METHOD-FUNCTION
60                ITERATE::WALK-GATHERING-BODY CACHE-MISS-VALUES
61                MAKE-OPTIMIZED-STD-READER-METHOD-FUNCTION
62                OPTIMIZE-SLOT-VALUE-BY-CLASS-P ACCESSOR-VALUES1
63                EMIT-READER/WRITER EMIT-ONE-OR-N-INDEX-READER/WRITER
64                GENERATING-LISP EMIT-READER/WRITER-FUNCTION
65              EMIT-ONE-OR-N-INDEX-READER/WRITER-FUNCTION              EMIT-ONE-OR-N-INDEX-READER/WRITER-FUNCTION
66              WALKER::WALK-LET-IF SET-SLOT-VALUE CONVERT-METHODS              WALKER::WALK-LET-IF SET-SLOT-VALUE CONVERT-METHODS
67              |(FAST-METHOD METHOD-LAMBDA-LIST (TRACED-METHOD))|              |(FAST-METHOD METHOD-LAMBDA-LIST (TRACED-METHOD))|
# Line 133  Line 81 
81              CHECKING-MISS GET-OPTIMIZED-STD-ACCESSOR-METHOD-FUNCTION              CHECKING-MISS GET-OPTIMIZED-STD-ACCESSOR-METHOD-FUNCTION
82              |(FAST-METHOD FUNCTION-KEYWORDS (STANDARD-METHOD))|              |(FAST-METHOD FUNCTION-KEYWORDS (STANDARD-METHOD))|
83              |(FAST-METHOD METHOD-PRETTY-ARGLIST (STANDARD-METHOD))|              |(FAST-METHOD METHOD-PRETTY-ARGLIST (STANDARD-METHOD))|
84              |(FAST-METHOD CLASS-PROTOTYPE (STD-CLASS))|              |(FAST-METHOD CLASS-PROTOTYPE (STD-CLASS))|))
             |(FAST-METHOD CLASS-PROTOTYPE (STRUCTURE-CLASS))|  
             |(FAST-METHOD MAKE-INSTANCES-OBSOLETE (SYMBOL))|  
             |(FAST-METHOD METHOD-FUNCTION (STANDARD-METHOD))|  
             |(FAST-METHOD COMPUTE-DISCRIMINATING-FUNCTION-ARGLIST-INFO (STANDARD-GENERIC-FUNCTION))|  
             GET-OPTIMIZED-STD-SLOT-VALUE-USING-CLASS-METHOD-FUNCTION  
             ITERATE::WALK-GATHERING-BODY CACHE-MISS-VALUES  
             MAKE-OPTIMIZED-STD-READER-METHOD-FUNCTION))  
85  (PROCLAIM  (PROCLAIM
86      '(FTYPE (FUNCTION (T) NON-NEGATIVE-FIXNUM) CACHE-NLINES      '(FTYPE (FUNCTION (T T T T T T T) *)
87              CACHE-MAX-LOCATION CACHE-SIZE CACHE-MASK))              |(FAST-METHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS (STANDARD-OBJECT T T T))|
88  (PROCLAIM '(FTYPE (FUNCTION (T STREAM T) T) PRINT-DFUN-INFO))              ITERATE::ITERATE-TRANSFORM-BODY))
89  (PROCLAIM  (PROCLAIM
90      '(FTYPE (FUNCTION (T T T *) T) REAL-GET-METHOD CHECK-INITARGS-1      '(FTYPE (FUNCTION (T T *) *) MAKE-FINAL-ACCESSOR-DFUN
91              GET-METHOD CHECK-INITARGS-2-PLIST CHECK-INITARGS-2-LIST              MAKE-ACCESSOR-TABLE GET-SIMPLE-INITIALIZATION-FUNCTION
92              WALKER::WALK-ARGLIST MAKE-EMF-CALL CAN-OPTIMIZE-ACCESS1              GET-COMPLEX-INITIALIZATION-FUNCTIONS
93              EMIT-FETCH-WRAPPER FILL-CACHE))              COMPUTE-SECONDARY-DISPATCH-FUNCTION SLOT-VALUE-OR-DEFAULT
94                MAKE-EFFECTIVE-METHOD-FUNCTION NESTED-WALK-FORM
95                GET-EFFECTIVE-METHOD-FUNCTION MAKE-N-N-ACCESSOR-DFUN
96                MAKE-CHECKING-DFUN LOAD-DEFGENERIC TYPES-FROM-ARGUMENTS
97                MAKE-DEFAULT-INITARGS-FORM-LIST))
98  (PROCLAIM  (PROCLAIM
99      '(FTYPE (FUNCTION (T T T T T *) T) EMIT-DLAP      '(FTYPE (FUNCTION (T T T T) *)
100              GET-SECONDARY-DISPATCH-FUNCTION1))              |(FAST-METHOD ALLOCATE-INSTANCE (STRUCTURE-CLASS))|
101                |(FAST-METHOD MAKE-INSTANCE (SYMBOL))|
102                |(FAST-METHOD DEFAULT-INITARGS (SLOT-CLASS T))|
103                |(FAST-METHOD INITIALIZE-INSTANCE (SLOT-OBJECT))|
104                |(FAST-METHOD DESCRIBE-OBJECT (T T))|
105                |(FAST-METHOD DESCRIBE-OBJECT (SLOT-OBJECT T))|
106                |(FAST-METHOD SLOTS-TO-INSPECT (SLOT-CLASS SLOT-OBJECT))|
107                |(FAST-METHOD DESCRIBE-OBJECT (STANDARD-GENERIC-FUNCTION T))|
108                |(FAST-METHOD DESCRIBE-OBJECT (CLASS T))|
109                |(FAST-METHOD COMPUTE-APPLICABLE-METHODS-USING-CLASSES (GENERIC-FUNCTION T))|
110                GET-ACCESSOR-FROM-SVUC-METHOD-FUNCTION
111                |(FAST-METHOD SLOT-ACCESSOR-FUNCTION (EFFECTIVE-SLOT-DEFINITION T))|
112                BOOTSTRAP-ACCESSOR-DEFINITION GET-ACCESSOR-METHOD-FUNCTION
113                EMIT-CHECKING-OR-CACHING EMIT-CHECKING-OR-CACHING-FUNCTION
114                SETF-SLOT-VALUE-USING-CLASS-DFUN LOAD-SHORT-DEFCOMBIN
115                INITIALIZE-INSTANCE-SIMPLE-FUNCTION
116                MAKE-SHARED-INITIALIZE-FORM-LIST
117                MAKE-ONE-CLASS-ACCESSOR-DFUN
118                MAKE-FINAL-ONE-INDEX-ACCESSOR-DFUN SET-CLASS-SLOT-VALUE-1
119                MAKE-FINAL-CHECKING-DFUN ACCESSOR-VALUES
120                GENERATE-DISCRIMINATION-NET REAL-MAKE-METHOD-LAMBDA
121                ORDER-SPECIALIZERS ACCESSOR-MISS
122                |(FAST-METHOD REINITIALIZE-INSTANCE :AFTER (SLOT-CLASS))|
123                |(FAST-METHOD DOCUMENTATION (STANDARD-SLOT-DEFINITION))|
124                |(FAST-METHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION (SLOT-CLASS T))|
125                |(FAST-METHOD NO-APPLICABLE-METHOD (T))|
126                |(FAST-METHOD CLASS-SLOT-VALUE (STD-CLASS T))|
127                |(FAST-METHOD LEGAL-QUALIFIERS-P (STANDARD-METHOD T))|
128                |(FAST-METHOD LEGAL-SPECIALIZERS-P (STANDARD-METHOD T))|))
129  (PROCLAIM  (PROCLAIM
130      '(FTYPE (FUNCTION (T T T FIXNUM) T) GET-CACHE      '(FTYPE (FUNCTION (T T T T T T) *) MEMF-CODE-CONVERTER
131              FILL-CACHE-FROM-CACHE-P))              CACHE-MISS-VALUES-INTERNAL
132                GENERATE-DISCRIMINATION-NET-INTERNAL
133                MAKE-LONG-METHOD-COMBINATION-FUNCTION
134                DO-SHORT-METHOD-COMBINATION
135                |(FAST-METHOD (SETF SLOT-VALUE-USING-CLASS) (T STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|))
136    (PROCLAIM '(FTYPE (FUNCTION (T T T T T T *) *) REAL-MAKE-A-METHOD))
137  (PROCLAIM  (PROCLAIM
138      '(FTYPE (FUNCTION (T T T T T T T) T)      '(FTYPE (FUNCTION (T T T *) *) MAKE-ONE-INDEX-ACCESSOR-DFUN
139              |(FAST-METHOD SLOT-MISSING (T T T T))| EXPAND-DEFMETHOD              WALKER::WALK-DECLARATIONS GET-SECONDARY-DISPATCH-FUNCTION))
             LOAD-DEFMETHOD-INTERNAL))  
140  (PROCLAIM  (PROCLAIM
141      '(FTYPE (FUNCTION (T T T T T T) T) REAL-LOAD-DEFCLASS      '(FTYPE (FUNCTION (T T T T *) *)
142              WALKER::WALK-TEMPLATE-HANDLE-REPEAT-1              MAKE-EFFECTIVE-METHOD-FUNCTION-SIMPLE1
143              BOOTSTRAP-MAKE-SLOT-DEFINITION EMIT-SLOT-ACCESS              ITERATE::RENAME-LET-BINDINGS))
             OPTIMIZE-GF-CALL SET-ARG-INFO1 LOAD-DEFCLASS  
             MAKE-EARLY-CLASS-DEFINITION  
             |(FAST-METHOD (SETF SLOT-VALUE-USING-CLASS) (T STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|))  
144  (PROCLAIM  (PROCLAIM
145      '(FTYPE (FUNCTION (T T *) T) ENSURE-GENERIC-FUNCTION-USING-CLASS      '(FTYPE (FUNCTION (T) NON-NEGATIVE-FIXNUM) CACHE-NLINES
146              MAKE-EFFECTIVE-METHOD-FUNCTION-SIMPLE MAKE-EMF-FROM-METHOD              CACHE-MAX-LOCATION CACHE-SIZE CACHE-MASK))
147              EXPAND-EFFECTIVE-METHOD-FUNCTION  (PROCLAIM '(FTYPE (FUNCTION (T STREAM T) T) PRINT-DFUN-INFO))
             NAMED-OBJECT-PRINT-FUNCTION FIND-CLASS-FROM-CELL  
             FIND-CLASS-PREDICATE-FROM-CELL INITIALIZE-INFO  
             GET-EFFECTIVE-METHOD-FUNCTION1 GET-DECLARATION  
             GET-METHOD-FUNCTION-PV-CELL EMIT-MISS METHOD-FUNCTION-GET  
             PROBE-CACHE MAP-CACHE PRECOMPUTE-EFFECTIVE-METHODS  
             RECORD-DEFINITION WALKER::CONVERT-MACRO-TO-LAMBDA CPL-ERROR  
             REAL-ADD-METHOD  
             REAL-ENSURE-GF-USING-CLASS--GENERIC-FUNCTION  
             REAL-ENSURE-GF-USING-CLASS--NULL  
             COMPUTE-SECONDARY-DISPATCH-FUNCTION1))  
148  (PROCLAIM  (PROCLAIM
149      '(FTYPE (FUNCTION (T T T T T) T)      '(FTYPE (FUNCTION (T T T T) T)
150              |(FAST-METHOD SLOT-UNBOUND (T T T))|              |(FAST-METHOD VALIDATE-SUPERCLASS (CLASS BUILT-IN-CLASS))|
151              |(FAST-METHOD FIND-METHOD-COMBINATION (GENERIC-FUNCTION (EQL STANDARD) T))|              |(FAST-METHOD VALIDATE-SUPERCLASS (SLOT-CLASS FORWARD-REFERENCED-CLASS))|
152              |(FAST-METHOD COMPUTE-EFFECTIVE-METHOD (GENERIC-FUNCTION SHORT-METHOD-COMBINATION T))|              |(FAST-METHOD ADD-DEPENDENT (DEPENDENT-UPDATE-MIXIN T))|
153              LOAD-FUNCTION-GENERATOR EXPAND-EMF-CALL-METHOD MAKE-FGEN              |(FAST-METHOD REMOVE-DEPENDENT (DEPENDENT-UPDATE-MIXIN T))|
154              BOOTSTRAP-MAKE-SLOT-DEFINITIONS              |(FAST-METHOD MAP-DEPENDENTS (DEPENDENT-UPDATE-MIXIN T))|
155              BOOTSTRAP-ACCESSOR-DEFINITIONS1              |(FAST-METHOD PRINT-OBJECT (T T))|
156              MAKE-FINAL-ORDINARY-DFUN-INTERNAL              |(FAST-METHOD PRINT-OBJECT (CLASS T))|
157              WALKER::WALK-TEMPLATE-HANDLE-REPEAT COMPUTE-PV-SLOT              |(FAST-METHOD PRINT-OBJECT (SLOT-DEFINITION T))|
158              WALKER::WALK-BINDINGS-1 OPTIMIZE-INSTANCE-ACCESS              |(FAST-METHOD PRINT-OBJECT (STANDARD-METHOD-COMBINATION T))|
159              OPTIMIZE-ACCESSOR-CALL MAKE-METHOD-INITARGS-FORM-INTERNAL1              |(FAST-METHOD INFORM-TYPE-SYSTEM-ABOUT-CLASS (STRUCTURE-CLASS T))|
160              UPDATE-SLOTS-IN-PV MAKE-PARAMETER-REFERENCES MAKE-EMF-CACHE              |(FAST-METHOD PRINT-OBJECT (STANDARD-METHOD T))|
161              GET-MAKE-INSTANCE-FUNCTION-INTERNAL              |(FAST-METHOD PRINT-OBJECT (STANDARD-ACCESSOR-METHOD T))|
162              |(FAST-METHOD (SETF SLOT-ACCESSOR-STD-P) (T EFFECTIVE-SLOT-DEFINITION T))|              |(FAST-METHOD REINITIALIZE-INSTANCE (STANDARD-METHOD))|
163              MAKE-INSTANCE-FUNCTION-COMPLEX              |(FAST-METHOD LEGAL-DOCUMENTATION-P (STANDARD-METHOD T))|
164              |(FAST-METHOD ENSURE-CLASS-USING-CLASS (T NULL))|              |(FAST-METHOD LEGAL-LAMBDA-LIST-P (STANDARD-METHOD T))|
165              MAKE-INSTANCE-FUNCTION-SIMPLE              |(FAST-METHOD LEGAL-METHOD-FUNCTION-P (STANDARD-METHOD T))|
166              |(FAST-METHOD ENSURE-CLASS-USING-CLASS (T PCL-CLASS))|              |(FAST-METHOD LEGAL-QUALIFIER-P (STANDARD-METHOD T))|
167              OPTIMIZE-GENERIC-FUNCTION-CALL              |(FAST-METHOD LEGAL-SLOT-NAME-P (STANDARD-METHOD T))|
168              REAL-MAKE-METHOD-INITARGS-FORM              |(FAST-METHOD LEGAL-SPECIALIZER-P (STANDARD-METHOD T))|
169              |(FAST-METHOD COMPUTE-SLOT-ACCESSOR-INFO (EFFECTIVE-SLOT-DEFINITION T T))|              |(FAST-METHOD PRINT-OBJECT (GENERIC-FUNCTION T))|
170              |(FAST-METHOD SHARED-INITIALIZE :AFTER (STD-CLASS T))|              |(FAST-METHOD INITIALIZE-INSTANCE :AFTER (STANDARD-GENERIC-FUNCTION))|
171              |(FAST-METHOD SHARED-INITIALIZE :AFTER (DOCUMENTATION-MIXIN T))|              MAKE-DISPATCH-LAMBDA
172              |(FAST-METHOD (SETF DOCUMENTATION) (T T))|              |(FAST-METHOD REINITIALIZE-INSTANCE :AFTER (STANDARD-GENERIC-FUNCTION))|
173              |(FAST-METHOD SHARED-INITIALIZE :AFTER (STRUCTURE-CLASS T))|              |(FAST-METHOD COMPUTE-APPLICABLE-METHODS (GENERIC-FUNCTION T))|
174              |(FAST-METHOD (SETF DOCUMENTATION) (T DOCUMENTATION-MIXIN))|              |(FAST-METHOD ALLOCATE-INSTANCE (STANDARD-CLASS))|
175              |(FAST-METHOD READER-METHOD-CLASS (SLOT-CLASS T))|              |(FAST-METHOD VALIDATE-SUPERCLASS (FUNCALLABLE-STANDARD-CLASS STANDARD-CLASS))|
176              |(FAST-METHOD WRITER-METHOD-CLASS (SLOT-CLASS T))|              |(FAST-METHOD ALLOCATE-INSTANCE (FUNCALLABLE-STANDARD-CLASS))|
177              |(FAST-METHOD SHARED-INITIALIZE :BEFORE (BUILT-IN-CLASS T))|              |(FAST-METHOD MAKE-READER-METHOD-FUNCTION (FUNCALLABLE-STANDARD-CLASS T))|
178              |(FAST-METHOD SLOT-BOUNDP-USING-CLASS (STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|              |(FAST-METHOD MAKE-WRITER-METHOD-FUNCTION (FUNCALLABLE-STANDARD-CLASS T))|
179              |(FAST-METHOD SLOT-MAKUNBOUND-USING-CLASS (STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|              WALKER::WALK-LET/LET* WALKER::WALK-PROG/PROG*
180              |(FAST-METHOD SHARED-INITIALIZE :AFTER (STRUCTURE-SLOT-DEFINITION T))|              WALKER::WALK-DO/DO* |(FAST-METHOD MAKE-INSTANCE (CLASS))|
181              |(FAST-METHOD SLOT-BOUNDP-USING-CLASS (STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|              WALKER::WALK-BINDINGS-2
182              |(FAST-METHOD SLOT-MAKUNBOUND-USING-CLASS (STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|              |(FAST-METHOD REINITIALIZE-INSTANCE (SLOT-OBJECT))|
183              |(FAST-METHOD SHARED-INITIALIZE :BEFORE (STANDARD-ACCESSOR-METHOD T))|              MAKE-EFFECTIVE-METHOD-FUNCTION1
184              |(FAST-METHOD SHARED-INITIALIZE :AFTER (STANDARD-METHOD T))|              MAKE-EFFECTIVE-METHOD-FUNCTION-INTERNAL
185              |(FAST-METHOD REMOVE-NAMED-METHOD (T T))|))              MAKE-EFFECTIVE-METHOD-FUNCTION-TYPE MEMF-TEST-CONVERTER
186                LOAD-PRECOMPILED-DFUN-CONSTRUCTOR TWO-CLASS-DFUN-INFO
187                OPTIMIZE-READER OPTIMIZE-WRITER MAYBE-EXPAND-ACCESSOR-FORM
188                |(FAST-METHOD ADD-DIRECT-SUBCLASS (CLASS CLASS))|
189                |(FAST-METHOD SAME-SPECIALIZER-P (SPECIALIZER SPECIALIZER))|
190                EMIT-CHECKING-OR-CACHING-FUNCTION-PRELIMINARY
191                |(FAST-METHOD SAME-SPECIALIZER-P (CLASS CLASS))|
192                INITIALIZE-INSTANCE-SIMPLE
193                |(FAST-METHOD SAME-SPECIALIZER-P (CLASS-EQ-SPECIALIZER CLASS-EQ-SPECIALIZER))|
194                GET-WRAPPERS-FROM-CLASSES
195                |(FAST-METHOD SAME-SPECIALIZER-P (EQL-SPECIALIZER EQL-SPECIALIZER))|
196                LOAD-PRECOMPILED-IIS-ENTRY FILL-CACHE-P ADJUST-CACHE
197                |(FAST-METHOD REMOVE-DIRECT-SUBCLASS (CLASS CLASS))|
198                EXPAND-CACHE EXPAND-SYMBOL-MACROLET-INTERNAL
199                |(FAST-METHOD ADD-DIRECT-METHOD (CLASS METHOD))|
200                BOOTSTRAP-SET-SLOT EXPAND-DEFCLASS
201                |(FAST-METHOD REMOVE-DIRECT-METHOD (CLASS METHOD))|
202                |(FAST-METHOD UPDATE-GF-DFUN (STD-CLASS T))|
203                |(FAST-METHOD ADD-DIRECT-METHOD (SPECIALIZER-WITH-OBJECT METHOD))|
204                |(FAST-METHOD REMOVE-DIRECT-METHOD (SPECIALIZER-WITH-OBJECT METHOD))|
205                |(FAST-METHOD SLOT-ACCESSOR-STD-P (EFFECTIVE-SLOT-DEFINITION T))|
206                WALKER::WALK-TEMPLATE
207                |(FAST-METHOD REINITIALIZE-INSTANCE :BEFORE (SLOT-CLASS))|
208                |(FAST-METHOD DOCUMENTATION (T))|
209                |(FAST-METHOD DOCUMENTATION (DOCUMENTATION-MIXIN))|
210                FROB-COMBINED-METHOD-ARGS
211                |(FAST-METHOD DIRECT-SLOT-DEFINITION-CLASS (STRUCTURE-CLASS T))|
212                |(FAST-METHOD DIRECT-SLOT-DEFINITION-CLASS (STD-CLASS T))|
213                |(FAST-METHOD EFFECTIVE-SLOT-DEFINITION-CLASS (STD-CLASS T))|
214                |(FAST-METHOD EFFECTIVE-SLOT-DEFINITION-CLASS (STRUCTURE-CLASS T))|
215                |(FAST-METHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION-INITARGS (SLOT-CLASS T))|
216                |(FAST-METHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION-INITARGS :AROUND (STRUCTURE-CLASS T))|
217                |(FAST-METHOD REMOVE-READER-METHOD (SLOT-CLASS T))|
218                |(FAST-METHOD REMOVE-WRITER-METHOD (SLOT-CLASS T))|
219                |(FAST-METHOD REMOVE-BOUNDP-METHOD (SLOT-CLASS T))|
220                |(FAST-METHOD MAKE-READER-METHOD-FUNCTION (SLOT-CLASS T))|
221                |(FAST-METHOD MAKE-WRITER-METHOD-FUNCTION (SLOT-CLASS T))|
222                |(FAST-METHOD MAKE-BOUNDP-METHOD-FUNCTION (SLOT-CLASS T))|
223                |(FAST-METHOD INFORM-TYPE-SYSTEM-ABOUT-CLASS (STD-CLASS T))|
224                |(FAST-METHOD COMPATIBLE-META-CLASS-CHANGE-P (T T))|
225                |(FAST-METHOD VALIDATE-SUPERCLASS (CLASS CLASS))|))
226  (PROCLAIM  (PROCLAIM
227      '(FTYPE (FUNCTION (T T T) T) DECLARE-STRUCTURE OPTIMIZE-SLOT-BOUNDP      '(FTYPE (FUNCTION (T T T) T) CHANGE-CLASS-INTERNAL
228              PRINT-CACHE FIRST-FORM-TO-LISP              STANDARD-COMPUTE-EFFECTIVE-METHOD
             ITERATE::OPTIMIZE-ITERATE-FORM  
             WRAP-METHOD-GROUP-SPECIFIER-BINDINGS MAKE-TOP-LEVEL-FORM  
             INVALIDATE-WRAPPER STANDARD-COMPUTE-EFFECTIVE-METHOD  
229              MAKE-OPTIMIZED-STD-SLOT-VALUE-USING-CLASS-METHOD-FUNCTION              MAKE-OPTIMIZED-STD-SLOT-VALUE-USING-CLASS-METHOD-FUNCTION
230              MAKE-OPTIMIZED-STD-SETF-SLOT-VALUE-USING-CLASS-METHOD-FUNCTION              MAKE-OPTIMIZED-STD-SETF-SLOT-VALUE-USING-CLASS-METHOD-FUNCTION
231              MAKE-OPTIMIZED-STD-SLOT-BOUNDP-USING-CLASS-METHOD-FUNCTION              MAKE-OPTIMIZED-STD-SLOT-BOUNDP-USING-CLASS-METHOD-FUNCTION
# Line 263  Line 264 
264              MAKE-DFUN-CALL WALKER::WALK-TAGBODY-1 WALKER::WALK-LAMBDA              MAKE-DFUN-CALL WALKER::WALK-TAGBODY-1 WALKER::WALK-LAMBDA
265              OPTIMIZE-GF-CALL-INTERNAL WALKER::WALK-COMPILER-LET              OPTIMIZE-GF-CALL-INTERNAL WALKER::WALK-COMPILER-LET
266              |(FAST-METHOD MAKE-INSTANCES-OBSOLETE (STD-CLASS))|              |(FAST-METHOD MAKE-INSTANCES-OBSOLETE (STD-CLASS))|
267              SKIP-FAST-SLOT-ACCESS-P WALKER::WALK-UNEXPECTED-DECLARE              SKIP-FAST-SLOT-ACCESS-P VARIABLE-DECLARATION
268              WALKER::WALK-FLET WALKER::WALK-IF WALKER::WALK-LABELS              WALKER::WALK-UNEXPECTED-DECLARE WALKER::WALK-FLET
269              WALKER::WALK-LET WALKER::WALK-LET* WALKER::WALK-LOCALLY              WALKER::WALK-IF WALKER::WALK-LABELS WALKER::WALK-LET
270                WALKER::WALK-LET* WALKER::WALK-LOCALLY
271              |(FAST-METHOD CLASS-DIRECT-SLOTS (BUILT-IN-CLASS))|              |(FAST-METHOD CLASS-DIRECT-SLOTS (BUILT-IN-CLASS))|
272              WALKER::WALK-MACROLET              WALKER::WALK-MACROLET
273              |(FAST-METHOD CLASS-SLOTS (BUILT-IN-CLASS))|              |(FAST-METHOD CLASS-SLOTS (BUILT-IN-CLASS))|
274              |(FAST-METHOD CLASS-DIRECT-DEFAULT-INITARGS (BUILT-IN-CLASS))|              |(FAST-METHOD CLASS-DIRECT-DEFAULT-INITARGS (BUILT-IN-CLASS))|
275              FIX-SLOT-ACCESSORS              WALKER::WALK-MULTIPLE-VALUE-BIND FIX-SLOT-ACCESSORS
276                WALKER::WALK-SETQ
277              |(FAST-METHOD WRAPPER-FETCHER (STANDARD-CLASS))|              |(FAST-METHOD WRAPPER-FETCHER (STANDARD-CLASS))|
278              WALKER::WALK-MULTIPLE-VALUE-BIND              WALKER::WALK-SYMBOL-MACROLET
279              |(FAST-METHOD CLASS-DEFAULT-INITARGS (BUILT-IN-CLASS))|              |(FAST-METHOD CLASS-DEFAULT-INITARGS (BUILT-IN-CLASS))|
280              WALKER::WALK-SETQ              WALKER::WALK-TAGBODY WALKER::WALK-DO WALKER::WALK-DO*
281              |(FAST-METHOD SLOTS-FETCHER (STANDARD-CLASS))|              |(FAST-METHOD SLOTS-FETCHER (STANDARD-CLASS))|
282              WALKER::WALK-SYMBOL-MACROLET              WALKER::WALK-PROG
283              |(FAST-METHOD RAW-INSTANCE-ALLOCATOR (STANDARD-CLASS))|              |(FAST-METHOD RAW-INSTANCE-ALLOCATOR (STANDARD-CLASS))|
284              EMIT-SLOT-READ-FORM WALKER::WALK-TAGBODY EMIT-BOUNDP-CHECK              EMIT-SLOT-READ-FORM WALKER::WALK-NAMED-LAMBDA
285              WALKER::WALK-DO WALKER::WALK-DO* WALKER::WALK-PROG              EMIT-BOUNDP-CHECK WALKER::WALK-PROG*
             WALKER::WALK-NAMED-LAMBDA WALKER::WALK-PROG*  
286              WALKER::WITH-AUGMENTED-ENVIRONMENT-INTERNAL              WALKER::WITH-AUGMENTED-ENVIRONMENT-INTERNAL
287              MAKE-METHOD-INITARGS-FORM-INTERNAL EXPAND-DEFGENERIC              MAKE-METHOD-INITARGS-FORM-INTERNAL EXPAND-DEFGENERIC
288              EMIT-GREATER-THAN-1-DLAP EMIT-1-T-DLAP ENTRY-IN-CACHE-P              EMIT-GREATER-THAN-1-DLAP EMIT-1-T-DLAP ENTRY-IN-CACHE-P
289              CONVERT-TABLE MAKE-METHOD-SPEC TRACE-EMF-CALL-INTERNAL              CONVERT-TABLE MAKE-METHOD-SPEC TRACE-EMF-CALL-INTERNAL
290              FLUSH-CACHE-TRAP COMPUTE-EFFECTIVE-METHOD              FLUSH-CACHE-TRAP SET-FUNCTION-NAME-1 OBSOLETE-INSTANCE-TRAP
             SET-FUNCTION-NAME-1 OBSOLETE-INSTANCE-TRAP  
291              COMPUTE-PRECEDENCE PRINT-STD-INSTANCE              COMPUTE-PRECEDENCE PRINT-STD-INSTANCE
             |SETF PCL METHOD-FUNCTION-GET| |SETF PCL PLIST-VALUE|  
292              |(FAST-METHOD ACCESSOR-METHOD-CLASS (STANDARD-ACCESSOR-METHOD))|              |(FAST-METHOD ACCESSOR-METHOD-CLASS (STANDARD-ACCESSOR-METHOD))|
293              |(FAST-METHOD ACCESSOR-METHOD-CLASS (STANDARD-WRITER-METHOD))|              |(FAST-METHOD ACCESSOR-METHOD-CLASS (STANDARD-WRITER-METHOD))|
294              INITIALIZE-INTERNAL-SLOT-GFS*              INITIALIZE-INTERNAL-SLOT-GFS*
# Line 296  Line 296 
296              SKIP-OPTIMIZE-SLOT-VALUE-BY-CLASS-P              SKIP-OPTIMIZE-SLOT-VALUE-BY-CLASS-P
297              |(FAST-METHOD GENERIC-FUNCTION-LAMBDA-LIST (GENERIC-FUNCTION))|              |(FAST-METHOD GENERIC-FUNCTION-LAMBDA-LIST (GENERIC-FUNCTION))|
298              |(FAST-METHOD GF-FAST-METHOD-FUNCTION-P (STANDARD-GENERIC-FUNCTION))|              |(FAST-METHOD GF-FAST-METHOD-FUNCTION-P (STANDARD-GENERIC-FUNCTION))|
299              SORT-APPLICABLE-METHODS SORT-METHODS VARIABLE-DECLARATION              SORT-APPLICABLE-METHODS SORT-METHODS
300              |(FAST-METHOD COMPUTE-CLASS-PRECEDENCE-LIST (SLOT-CLASS))|              |(FAST-METHOD COMPUTE-CLASS-PRECEDENCE-LIST (SLOT-CLASS))|
301              CAN-OPTIMIZE-ACCESS              CAN-OPTIMIZE-ACCESS
302              |(FAST-METHOD WRAPPER-FETCHER (FUNCALLABLE-STANDARD-CLASS))|              |(FAST-METHOD WRAPPER-FETCHER (FUNCALLABLE-STANDARD-CLASS))|
303              OPTIMIZE-SLOT-VALUE              OPTIMIZE-SLOT-VALUE
304              |(FAST-METHOD SLOTS-FETCHER (FUNCALLABLE-STANDARD-CLASS))|              |(FAST-METHOD SLOTS-FETCHER (FUNCALLABLE-STANDARD-CLASS))|
305              OPTIMIZE-SET-SLOT-VALUE              OPTIMIZE-SET-SLOT-VALUE
306              |(FAST-METHOD RAW-INSTANCE-ALLOCATOR (FUNCALLABLE-STANDARD-CLASS))|))              |(FAST-METHOD RAW-INSTANCE-ALLOCATOR (FUNCALLABLE-STANDARD-CLASS))|
307                COMPUTE-EFFECTIVE-METHOD DECLARE-STRUCTURE
308                OPTIMIZE-SLOT-BOUNDP PRINT-CACHE FIRST-FORM-TO-LISP
309                ITERATE::OPTIMIZE-ITERATE-FORM
310                WRAP-METHOD-GROUP-SPECIFIER-BINDINGS MAKE-TOP-LEVEL-FORM
311                INVALIDATE-WRAPPER))
312  (PROCLAIM  (PROCLAIM
313      '(FTYPE (FUNCTION (T T T T) T)      '(FTYPE (FUNCTION (T T T T T) T)
             |(FAST-METHOD ALLOCATE-INSTANCE (STANDARD-CLASS))|  
             |(FAST-METHOD VALIDATE-SUPERCLASS (FUNCALLABLE-STANDARD-CLASS STANDARD-CLASS))|  
             |(FAST-METHOD ALLOCATE-INSTANCE (FUNCALLABLE-STANDARD-CLASS))|  
             |(FAST-METHOD MAKE-READER-METHOD-FUNCTION (FUNCALLABLE-STANDARD-CLASS T))|  
             |(FAST-METHOD MAKE-WRITER-METHOD-FUNCTION (FUNCALLABLE-STANDARD-CLASS T))|  
             WALKER::WALK-LET/LET* WALKER::WALK-PROG/PROG*  
             WALKER::WALK-DO/DO* |(FAST-METHOD MAKE-INSTANCE (CLASS))|  
             WALKER::WALK-BINDINGS-2  
             |(FAST-METHOD REINITIALIZE-INSTANCE (SLOT-OBJECT))|  
             MAKE-EFFECTIVE-METHOD-FUNCTION1  
             MAKE-EFFECTIVE-METHOD-FUNCTION-INTERNAL  
             MAKE-EFFECTIVE-METHOD-FUNCTION-TYPE MEMF-TEST-CONVERTER  
             LOAD-PRECOMPILED-DFUN-CONSTRUCTOR TWO-CLASS-DFUN-INFO  
             OPTIMIZE-READER OPTIMIZE-WRITER MAYBE-EXPAND-ACCESSOR-FORM  
             |(FAST-METHOD ADD-DIRECT-SUBCLASS (CLASS CLASS))|  
             |(FAST-METHOD SAME-SPECIALIZER-P (SPECIALIZER SPECIALIZER))|  
             EMIT-CHECKING-OR-CACHING-FUNCTION-PRELIMINARY  
             |(FAST-METHOD SAME-SPECIALIZER-P (CLASS CLASS))|  
             INITIALIZE-INSTANCE-SIMPLE  
             |(FAST-METHOD SAME-SPECIALIZER-P (CLASS-EQ-SPECIALIZER CLASS-EQ-SPECIALIZER))|  
             GET-WRAPPERS-FROM-CLASSES  
             |(FAST-METHOD SAME-SPECIALIZER-P (EQL-SPECIALIZER EQL-SPECIALIZER))|  
             LOAD-PRECOMPILED-IIS-ENTRY FILL-CACHE-P ADJUST-CACHE  
             |(FAST-METHOD REMOVE-DIRECT-SUBCLASS (CLASS CLASS))|  
             EXPAND-CACHE EXPAND-SYMBOL-MACROLET-INTERNAL  
             |(FAST-METHOD ADD-DIRECT-METHOD (CLASS METHOD))|  
             BOOTSTRAP-SET-SLOT EXPAND-DEFCLASS  
             |(FAST-METHOD REMOVE-DIRECT-METHOD (CLASS METHOD))|  
             |(FAST-METHOD UPDATE-GF-DFUN (STD-CLASS T))|  
             |(FAST-METHOD ADD-DIRECT-METHOD (SPECIALIZER-WITH-OBJECT METHOD))|  
             |(FAST-METHOD REMOVE-DIRECT-METHOD (SPECIALIZER-WITH-OBJECT METHOD))|  
             |(FAST-METHOD SLOT-ACCESSOR-STD-P (EFFECTIVE-SLOT-DEFINITION T))|  
             WALKER::WALK-TEMPLATE  
             |(FAST-METHOD REINITIALIZE-INSTANCE :BEFORE (SLOT-CLASS))|  
             |(FAST-METHOD DOCUMENTATION (T))|  
             |(FAST-METHOD DOCUMENTATION (DOCUMENTATION-MIXIN))|  
             |(FAST-METHOD DIRECT-SLOT-DEFINITION-CLASS (STRUCTURE-CLASS T))|  
             |(FAST-METHOD DIRECT-SLOT-DEFINITION-CLASS (STD-CLASS T))|  
             |(FAST-METHOD EFFECTIVE-SLOT-DEFINITION-CLASS (STD-CLASS T))|  
             |(FAST-METHOD EFFECTIVE-SLOT-DEFINITION-CLASS (STRUCTURE-CLASS T))|  
             |(FAST-METHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION-INITARGS (SLOT-CLASS T))|  
             |(FAST-METHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION-INITARGS :AROUND (STRUCTURE-CLASS T))|  
             |(FAST-METHOD REMOVE-READER-METHOD (SLOT-CLASS T))|  
             |(FAST-METHOD REMOVE-WRITER-METHOD (SLOT-CLASS T))|  
             |(FAST-METHOD REMOVE-BOUNDP-METHOD (SLOT-CLASS T))|  
             |(FAST-METHOD MAKE-READER-METHOD-FUNCTION (SLOT-CLASS T))|  
             |(FAST-METHOD MAKE-WRITER-METHOD-FUNCTION (SLOT-CLASS T))|  
             |(FAST-METHOD MAKE-BOUNDP-METHOD-FUNCTION (SLOT-CLASS T))|  
             |(FAST-METHOD INFORM-TYPE-SYSTEM-ABOUT-CLASS (STD-CLASS T))|  
             |(FAST-METHOD COMPATIBLE-META-CLASS-CHANGE-P (T T))|  
             |(FAST-METHOD VALIDATE-SUPERCLASS (CLASS CLASS))|  
314              |(FAST-METHOD CHANGE-CLASS (STANDARD-OBJECT STANDARD-CLASS))|              |(FAST-METHOD CHANGE-CLASS (STANDARD-OBJECT STANDARD-CLASS))|
315              |(FAST-METHOD CHANGE-CLASS (STANDARD-OBJECT FUNCALLABLE-STANDARD-CLASS))|              |(FAST-METHOD CHANGE-CLASS (STANDARD-OBJECT FUNCALLABLE-STANDARD-CLASS))|
316              |(FAST-METHOD VALIDATE-SUPERCLASS (CLASS BUILT-IN-CLASS))|              |(FAST-METHOD SHARED-INITIALIZE (SLOT-OBJECT T))|
317              |(FAST-METHOD VALIDATE-SUPERCLASS (SLOT-CLASS FORWARD-REFERENCED-CLASS))|              |(FAST-METHOD SLOT-UNBOUND (T T T))|
318              |(FAST-METHOD ADD-DEPENDENT (DEPENDENT-UPDATE-MIXIN T))|              |(FAST-METHOD FIND-METHOD-COMBINATION (GENERIC-FUNCTION (EQL STANDARD) T))|
319              |(FAST-METHOD REMOVE-DEPENDENT (DEPENDENT-UPDATE-MIXIN T))|              |(FAST-METHOD COMPUTE-EFFECTIVE-METHOD (GENERIC-FUNCTION SHORT-METHOD-COMBINATION T))|
320              |(FAST-METHOD MAP-DEPENDENTS (DEPENDENT-UPDATE-MIXIN T))|              LOAD-FUNCTION-GENERATOR EXPAND-EMF-CALL-METHOD MAKE-FGEN
321              |(FAST-METHOD PRINT-OBJECT (T T))|              BOOTSTRAP-MAKE-SLOT-DEFINITIONS
322              |(FAST-METHOD PRINT-OBJECT (CLASS T))|              BOOTSTRAP-ACCESSOR-DEFINITIONS1
323              |(FAST-METHOD PRINT-OBJECT (SLOT-DEFINITION T))|              MAKE-FINAL-ORDINARY-DFUN-INTERNAL
324              |(FAST-METHOD PRINT-OBJECT (STANDARD-METHOD-COMBINATION T))|              WALKER::WALK-TEMPLATE-HANDLE-REPEAT COMPUTE-PV-SLOT
325              |(FAST-METHOD INFORM-TYPE-SYSTEM-ABOUT-CLASS (STRUCTURE-CLASS T))|              WALKER::WALK-BINDINGS-1 OPTIMIZE-INSTANCE-ACCESS
326              |(FAST-METHOD PRINT-OBJECT (STANDARD-METHOD T))|              OPTIMIZE-ACCESSOR-CALL MAKE-METHOD-INITARGS-FORM-INTERNAL1
327              |(FAST-METHOD PRINT-OBJECT (STANDARD-ACCESSOR-METHOD T))|              UPDATE-SLOTS-IN-PV MAKE-EMF-CACHE
328              |(FAST-METHOD REINITIALIZE-INSTANCE (STANDARD-METHOD))|              GET-MAKE-INSTANCE-FUNCTION-INTERNAL
329              |(FAST-METHOD LEGAL-DOCUMENTATION-P (STANDARD-METHOD T))|              |(FAST-METHOD (SETF SLOT-ACCESSOR-STD-P) (T EFFECTIVE-SLOT-DEFINITION T))|
330              |(FAST-METHOD LEGAL-LAMBDA-LIST-P (STANDARD-METHOD T))|              MAKE-INSTANCE-FUNCTION-COMPLEX
331              |(FAST-METHOD LEGAL-METHOD-FUNCTION-P (STANDARD-METHOD T))|              |(FAST-METHOD ENSURE-CLASS-USING-CLASS (T NULL))|
332              |(FAST-METHOD LEGAL-QUALIFIER-P (STANDARD-METHOD T))|              MAKE-INSTANCE-FUNCTION-SIMPLE
333              |(FAST-METHOD LEGAL-SLOT-NAME-P (STANDARD-METHOD T))|              |(FAST-METHOD ENSURE-CLASS-USING-CLASS (T PCL-CLASS))|
334              |(FAST-METHOD LEGAL-SPECIALIZER-P (STANDARD-METHOD T))|              OPTIMIZE-GENERIC-FUNCTION-CALL
335              |(FAST-METHOD PRINT-OBJECT (GENERIC-FUNCTION T))|              REAL-MAKE-METHOD-INITARGS-FORM
336              |(FAST-METHOD INITIALIZE-INSTANCE :AFTER (STANDARD-GENERIC-FUNCTION))|              |(FAST-METHOD COMPUTE-SLOT-ACCESSOR-INFO (EFFECTIVE-SLOT-DEFINITION T T))|
337              MAKE-DISPATCH-LAMBDA              |(FAST-METHOD SHARED-INITIALIZE :AFTER (STD-CLASS T))|
338              |(FAST-METHOD REINITIALIZE-INSTANCE :AFTER (STANDARD-GENERIC-FUNCTION))|              |(FAST-METHOD SHARED-INITIALIZE :AFTER (DOCUMENTATION-MIXIN T))|
339              |(FAST-METHOD COMPUTE-APPLICABLE-METHODS (GENERIC-FUNCTION T))|))              |(FAST-METHOD (SETF DOCUMENTATION) (T T))|
340                |(FAST-METHOD SHARED-INITIALIZE :AFTER (STRUCTURE-CLASS T))|
341                |(FAST-METHOD (SETF DOCUMENTATION) (T DOCUMENTATION-MIXIN))|
342                |(FAST-METHOD READER-METHOD-CLASS (SLOT-CLASS T))|
343                |(FAST-METHOD WRITER-METHOD-CLASS (SLOT-CLASS T))|
344                |(FAST-METHOD SHARED-INITIALIZE :BEFORE (BUILT-IN-CLASS T))|
345                |(FAST-METHOD SLOT-BOUNDP-USING-CLASS (STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|
346                |(FAST-METHOD SLOT-MAKUNBOUND-USING-CLASS (STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|
347                |(FAST-METHOD SHARED-INITIALIZE :AFTER (STRUCTURE-SLOT-DEFINITION T))|
348                |(FAST-METHOD SLOT-BOUNDP-USING-CLASS (STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|
349                |(FAST-METHOD SLOT-MAKUNBOUND-USING-CLASS (STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|
350                |(FAST-METHOD SHARED-INITIALIZE :BEFORE (STANDARD-ACCESSOR-METHOD T))|
351                |(FAST-METHOD SHARED-INITIALIZE :AFTER (STANDARD-METHOD T))|
352                |(FAST-METHOD REMOVE-NAMED-METHOD (T T))|))
353  (PROCLAIM  (PROCLAIM
354      '(FTYPE (FUNCTION (T T T T T T T T T *) T)      '(FTYPE (FUNCTION (T T T T T T) T) REAL-LOAD-DEFCLASS
355              BOOTSTRAP-INITIALIZE-CLASS))              WALKER::WALK-TEMPLATE-HANDLE-REPEAT-1
356  (PROCLAIM '(FTYPE (FUNCTION (T T FIXNUM) T) COMPUTE-STD-CPL-PHASE-3))              BOOTSTRAP-MAKE-SLOT-DEFINITION EMIT-SLOT-ACCESS
357                OPTIMIZE-GF-CALL SET-ARG-INFO1 LOAD-DEFCLASS
358                MAKE-EARLY-CLASS-DEFINITION
359                |(FAST-METHOD (SETF SLOT-VALUE-USING-CLASS) (T STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|
360                |(FAST-METHOD FIND-METHOD (STANDARD-GENERIC-FUNCTION T T))|))
361  (PROCLAIM  (PROCLAIM
362      '(FTYPE (FUNCTION (T T T T T T T T) T)      '(FTYPE (FUNCTION (T T *) T) ENSURE-GENERIC-FUNCTION-USING-CLASS
363              GET-SECONDARY-DISPATCH-FUNCTION2))              MAKE-EFFECTIVE-METHOD-FUNCTION-SIMPLE MAKE-EMF-FROM-METHOD
364                EXPAND-EFFECTIVE-METHOD-FUNCTION
365                NAMED-OBJECT-PRINT-FUNCTION FIND-CLASS-FROM-CELL
366                FIND-CLASS-PREDICATE-FROM-CELL INITIALIZE-INFO
367                GET-EFFECTIVE-METHOD-FUNCTION1 GET-DECLARATION
368                GET-METHOD-FUNCTION-PV-CELL EMIT-MISS METHOD-FUNCTION-GET
369                PROBE-CACHE MAP-CACHE PRECOMPUTE-EFFECTIVE-METHODS
370                RECORD-DEFINITION WALKER::CONVERT-MACRO-TO-LAMBDA CPL-ERROR
371                REAL-ADD-METHOD
372                REAL-ENSURE-GF-USING-CLASS--GENERIC-FUNCTION
373                REAL-ENSURE-GF-USING-CLASS--NULL
374                COMPUTE-SECONDARY-DISPATCH-FUNCTION1))
375  (PROCLAIM  (PROCLAIM
376      '(FTYPE (FUNCTION (T T T T *) T) FILL-DFUN-CACHE      '(FTYPE (FUNCTION (T T T T T T T) T)
377              EARLY-ADD-NAMED-METHOD REAL-ADD-NAMED-METHOD))              |(FAST-METHOD SLOT-MISSING (T T T T))| EXPAND-DEFMETHOD
378                LOAD-DEFMETHOD-INTERNAL))
379    (PROCLAIM
380        '(FTYPE (FUNCTION (T T T FIXNUM) T) GET-CACHE
381                FILL-CACHE-FROM-CACHE-P))
382    (PROCLAIM
383        '(FTYPE (FUNCTION (T T T T T *) T) EMIT-DLAP
384                GET-SECONDARY-DISPATCH-FUNCTION1))
385    (PROCLAIM
386        '(FTYPE (FUNCTION (T T T *) T) REAL-GET-METHOD CHECK-INITARGS-1
387                GET-METHOD CHECK-INITARGS-2-PLIST CHECK-INITARGS-2-LIST
388                WALKER::WALK-ARGLIST CAN-OPTIMIZE-ACCESS1 MAKE-EMF-CALL
389                EMIT-FETCH-WRAPPER FILL-CACHE))
390  (PROCLAIM  (PROCLAIM
391      '(FTYPE (FUNCTION (T T T T T T *) T) LOAD-DEFMETHOD      '(FTYPE (FUNCTION (T T T T T T *) T) LOAD-DEFMETHOD
392              MAKE-DEFMETHOD-FORM MAKE-DEFMETHOD-FORM-INTERNAL              MAKE-DEFMETHOD-FORM MAKE-DEFMETHOD-FORM-INTERNAL
393              EARLY-MAKE-A-METHOD))              EARLY-MAKE-A-METHOD))
394  (PROCLAIM  (PROCLAIM
395        '(FTYPE (FUNCTION (T T T T *) T) FILL-DFUN-CACHE
396                EARLY-ADD-NAMED-METHOD REAL-ADD-NAMED-METHOD))
397    (PROCLAIM
398        '(FTYPE (FUNCTION (T T T T T T T T) T)
399                GET-SECONDARY-DISPATCH-FUNCTION2))
400    (PROCLAIM '(FTYPE (FUNCTION (T T FIXNUM) T) COMPUTE-STD-CPL-PHASE-3))
401    (PROCLAIM
402        '(FTYPE (FUNCTION (T T T T T T T T T *) T)
403                BOOTSTRAP-INITIALIZE-CLASS))
404    (PROCLAIM
405      '(FTYPE (FUNCTION NIL *) COUNT-ALL-DFUNS EMIT-N-N-READERS      '(FTYPE (FUNCTION NIL *) COUNT-ALL-DFUNS EMIT-N-N-READERS
406              EMIT-N-N-WRITERS))              EMIT-N-N-WRITERS))
407  (PROCLAIM  (PROCLAIM
# Line 405  Line 409 
409              UPDATE-MAKE-INSTANCE-FUNCTION-TABLE INVALID-METHOD-ERROR              UPDATE-MAKE-INSTANCE-FUNCTION-TABLE INVALID-METHOD-ERROR
410              METHOD-COMBINATION-ERROR))              METHOD-COMBINATION-ERROR))
411  (PROCLAIM  (PROCLAIM
412      '(FTYPE (FUNCTION NIL T) MAKE-CACHE IN-THE-COMPILER-P      '(FTYPE (FUNCTION NIL T) G98780 G98929 BOOTSTRAP-META-BRAID
413              STRUCTURE-FUNCTIONS-EXIST-P ALLOCATE-FUNCALLABLE-INSTANCE-2              BOOTSTRAP-BUILT-IN-CLASSES LIST-ALL-DFUNS
414              %%ALLOCATE-INSTANCE--CLASS ALLOCATE-FUNCALLABLE-INSTANCE-1              DEFAULT-METHOD-ONLY-DFUN-INFO
             DISPATCH-DFUN-INFO INITIAL-DISPATCH-DFUN-INFO  
             INITIAL-DFUN-INFO NO-METHODS-DFUN-INFO  
             SHOW-FREE-CACHE-VECTORS MAKE-CPD MAKE-ARG-INFO  
             SHOW-DFUN-CONSTRUCTORS RENEW-SYS-FILES  
             GET-EFFECTIVE-METHOD-GENSYM SHOW-EMF-CALL-TRACE  
             BOOTSTRAP-META-BRAID BOOTSTRAP-BUILT-IN-CLASSES  
             LIST-ALL-DFUNS DEFAULT-METHOD-ONLY-DFUN-INFO  
415              INITIALIZE-CHECKING-OR-CACHING-FUNCTION-LIST              INITIALIZE-CHECKING-OR-CACHING-FUNCTION-LIST
416              CACHES-TO-ALLOCATE UPDATE-DISPATCH-DFUNS))              CACHES-TO-ALLOCATE UPDATE-DISPATCH-DFUNS MAKE-CACHE
417  (PROCLAIM '(FTYPE (FUNCTION (FIXNUM T *) *) FIND-FREE-CACHE-LINE))              IN-THE-COMPILER-P STRUCTURE-FUNCTIONS-EXIST-P
418                ALLOCATE-FUNCALLABLE-INSTANCE-2 %%ALLOCATE-INSTANCE--CLASS
419                ALLOCATE-FUNCALLABLE-INSTANCE-1 DISPATCH-DFUN-INFO
420                INITIAL-DISPATCH-DFUN-INFO INITIAL-DFUN-INFO
421                NO-METHODS-DFUN-INFO SHOW-FREE-CACHE-VECTORS MAKE-CPD
422                MAKE-ARG-INFO SHOW-DFUN-CONSTRUCTORS RENEW-SYS-FILES
423                GET-EFFECTIVE-METHOD-GENSYM SHOW-EMF-CALL-TRACE G30241
424                G19088 G31813 G19259))
425  (PROCLAIM '(FTYPE (FUNCTION (FIXNUM T T) *) COMPUTE-CACHE-PARAMETERS))  (PROCLAIM '(FTYPE (FUNCTION (FIXNUM T T) *) COMPUTE-CACHE-PARAMETERS))
426    (PROCLAIM '(FTYPE (FUNCTION (FIXNUM T *) *) FIND-FREE-CACHE-LINE))
427  (PROCLAIM  (PROCLAIM
428      '(FTYPE (FUNCTION (*) T) |__si::MAKE-DFUN-INFO|      '(FTYPE (FUNCTION (*) T) |__si::MAKE-DFUN-INFO|
429              |__si::MAKE-NO-METHODS| |__si::MAKE-INITIAL|              |__si::MAKE-NO-METHODS| |__si::MAKE-INITIAL|
# Line 462  Line 467 
467      '(FTYPE (FUNCTION (T FIXNUM *) T) GET-CACHE-FROM-CACHE      '(FTYPE (FUNCTION (T FIXNUM *) T) GET-CACHE-FROM-CACHE
468              COMPUTE-PRIMARY-CACHE-LOCATION-FROM-LOCATION))              COMPUTE-PRIMARY-CACHE-LOCATION-FROM-LOCATION))
469  (PROCLAIM  (PROCLAIM
470      '(FTYPE (FUNCTION (T) T) CLASS-OF CHECK-CACHE DISPATCH-CACHE      '(FTYPE (FUNCTION (T) T) COMPUTE-LINE-SIZE ONE-INDEX-CACHE
             CLASS-FROM-TYPE DEFAULT-METHOD-ONLY-CACHE DNET-METHODS-P  
             ACCESSOR-DFUN-INFO-CACHE METHOD-FUNCTION-FROM-FAST-FUNCTION  
             INTERN-EQL-SPECIALIZER ONE-INDEX-DFUN-INFO-CACHE  
             ONE-INDEX-DFUN-INFO-ACCESSOR-TYPE  
             METHOD-CALL-CALL-METHOD-ARGS KEYWORD-SPEC-NAME N-N-CACHE  
             EXTRACT-LAMBDA-LIST GENERIC-CLOBBERS-FUNCTION  
             N-N-ACCESSOR-TYPE DEFAULT-CONSTANT-CONVERTER  
             FAST-METHOD-CALL-PV-CELL WRAPPER-FOR-STRUCTURE  
             ONE-CLASS-CACHE FAST-METHOD-CALL-NEXT-METHOD-CALL  
             ONE-CLASS-ACCESSOR-TYPE ONE-CLASS-INDEX BUILT-IN-WRAPPER-OF  
             TWO-CLASS-CACHE BUILT-IN-OR-STRUCTURE-WRAPPER1  
             WALKER::GET-WALKER-TEMPLATE TWO-CLASS-ACCESSOR-TYPE  
             TWO-CLASS-INDEX GET-MAKE-INSTANCE-FUNCTION-SYMBOL  
             ALLOCATE-CACHE-VECTOR TWO-CLASS-WRAPPER0  
             FLUSH-CACHE-VECTOR-INTERNAL COMPUTE-LINE-SIZE  
             EXTRACT-SPECIALIZER-NAMES ONE-INDEX-CACHE  
471              GF-PRECOMPUTE-DFUN-AND-EMF-P EARLY-CLASS-NAME              GF-PRECOMPUTE-DFUN-AND-EMF-P EARLY-CLASS-NAME
472              CANONICAL-SLOT-NAME ONE-INDEX-ACCESSOR-TYPE              CANONICAL-SLOT-NAME ONE-INDEX-ACCESSOR-TYPE
473              GF-INFO-STATIC-C-A-M-EMF COMPILE-LAMBDA-UNCOMPILED              GF-INFO-STATIC-C-A-M-EMF COMPILE-LAMBDA-UNCOMPILED
474              ONE-INDEX-INDEX INTERN-FUNCTION-NAME GF-LAMBDA-LIST              ONE-INDEX-INDEX INTERN-FUNCTION-NAME ECD-CANONICAL-SLOTS
475              CHECKING-P CHECKING-CACHE CACHING-CACHE EARLY-CLASS-SLOTS              GF-LAMBDA-LIST CHECKING-P CHECKING-CACHE CACHING-CACHE
476              CONSTANT-VALUE-CACHE GF-INFO-C-A-M-EMF-STD-P              EARLY-CLASS-SLOTS CONSTANT-VALUE-CACHE
477              COMPILE-LAMBDA-DEFERRED STRUCTURE-TYPE-INTERNAL-SLOTDS              GF-INFO-C-A-M-EMF-STD-P COMPILE-LAMBDA-DEFERRED
478              FUNCALLABLE-INSTANCE-P GF-INFO-FAST-MF-P SHOW-DFUN-COSTS              STRUCTURE-TYPE-INTERNAL-SLOTDS FUNCALLABLE-INSTANCE-P
479              UNDEFMETHOD-1 RESET-CLASS-INITIALIZE-INFO              GF-INFO-FAST-MF-P SHOW-DFUN-COSTS UNDEFMETHOD-1
480              METHOD-LL->GENERIC-FUNCTION-LL EARLY-COLLECT-CPL              RESET-CLASS-INITIALIZE-INFO METHOD-LL->GENERIC-FUNCTION-LL
481              GET-CACHE-VECTOR EARLY-COLLECT-SLOTS CONSTANT-SYMBOL-P              EARLY-COLLECT-CPL GET-CACHE-VECTOR PARSE-SPECIALIZERS
482              ARG-INFO-P FREE-CACHE-VECTOR EARLY-METHOD-LAMBDA-LIST              EARLY-COLLECT-SLOTS CONSTANT-SYMBOL-P ARG-INFO-P
483              FAST-METHOD-CALL-ARG-INFO ARG-INFO-VALID-P              FREE-CACHE-VECTOR EARLY-METHOD-LAMBDA-LIST
484                FAST-METHOD-CALL-ARG-INFO SYSTEM:%STRUCTURE-NAME
485                ARG-INFO-VALID-P SYSTEM:%COMPILED-FUNCTION-NAME
486              EARLY-COLLECT-DEFAULT-INITARGS DFUN-ARG-SYMBOL              EARLY-COLLECT-DEFAULT-INITARGS DFUN-ARG-SYMBOL
487              ARG-INFO-NKEYS EARLY-METHOD-CLASS ECD-SUPERCLASS-NAMES              ARG-INFO-NKEYS EARLY-METHOD-CLASS ECD-SUPERCLASS-NAMES
488              EARLY-GF-P GF-DFUN-CACHE EARLY-GF-NAME GF-DFUN-INFO              EARLY-GF-P GF-DFUN-CACHE EARLY-GF-NAME GF-DFUN-INFO
# Line 500  Line 491 
491              CONSTANT-VALUE-DFUN-INFO FUNCTION-RETURNING-NIL              CONSTANT-VALUE-DFUN-INFO FUNCTION-RETURNING-NIL
492              RESET-CLASS-INITIALIZE-INFO-1 ITERATE::SEQUENCE-ACCESSOR              RESET-CLASS-INITIALIZE-INFO-1 ITERATE::SEQUENCE-ACCESSOR
493              MAKE-CALL-METHODS FREE-CACHE              MAKE-CALL-METHODS FREE-CACHE
494              ACCESSOR-DFUN-INFO-ACCESSOR-TYPE PARSE-SPECIALIZERS              ACCESSOR-DFUN-INFO-ACCESSOR-TYPE EVAL-FORM
             ECD-CANONICAL-SLOTS RESET-INITIALIZE-INFO EVAL-FORM  
495              ONE-INDEX-DFUN-INFO-INDEX EARLY-METHOD-QUALIFIERS              ONE-INDEX-DFUN-INFO-INDEX EARLY-METHOD-QUALIFIERS
496              ECD-OTHER-INITARGS PROCLAIM-INCOMPATIBLE-SUPERCLASSES              ECD-OTHER-INITARGS PROCLAIM-INCOMPATIBLE-SUPERCLASSES
497              SLOT-INITARGS-FROM-STRUCTURE-SLOTD WRAPPER-OF TYPE-CLASS              SLOT-INITARGS-FROM-STRUCTURE-SLOTD WRAPPER-OF TYPE-CLASS
# Line 515  Line 505 
505              COMPLICATED-INSTANCE-CREATION-METHOD CHECKING-FUNCTION              COMPLICATED-INSTANCE-CREATION-METHOD CHECKING-FUNCTION
506              DEFAULT-STRUCTUREP BOOTSTRAP-ACCESSOR-DEFINITIONS              DEFAULT-STRUCTUREP BOOTSTRAP-ACCESSOR-DEFINITIONS
507              UPDATE-GF-INFO INITIALIZE-INFO-KEY CACHE-OWNER              UPDATE-GF-INFO INITIALIZE-INFO-KEY CACHE-OWNER
508              BOOTSTRAP-CLASS-PREDICATES DEFAULT-STRUCTURE-INSTANCE-P              VARIABLE-GLOBALLY-SPECIAL-P BOOTSTRAP-CLASS-PREDICATES
509              GET-BUILT-IN-CLASS-SYMBOL DEFAULT-STRUCTURE-TYPE              WALKER::ENV-WALK-FUNCTION DEFAULT-STRUCTURE-INSTANCE-P
510              INITIALIZE-INFO-WRAPPER STRUCTURE-TYPE              WALKER::GET-IMPLEMENTATION-DEPENDENT-WALKER-TEMPLATE
511              GET-BUILT-IN-WRAPPER-SYMBOL COMPUTE-STD-CPL-PHASE-2              WALKER::ENV-WALK-FORM GET-BUILT-IN-CLASS-SYMBOL
512              DO-STANDARD-DEFSETF-1 GET-PV-CELL-FOR-CLASS CACHING-P              MAKE-DEFAULT-METHOD-GROUP-DESCRIPTION
513              STRUCTURE-TYPE-INCLUDED-TYPE-NAME GFS-OF-TYPE              DEFAULT-STRUCTURE-TYPE METHOD-FUNCTION-NEEDS-NEXT-METHODS-P
514              STRUCTURE-TYPE-SLOT-DESCRIPTION-LIST LEGAL-CLASS-NAME-P              INITIALIZE-INFO-WRAPPER DFUN-INFO-P STRUCTURE-TYPE
515              CACHE-P STRUCTURE-TYPE-P STRUCTURE-SLOTD-NAME              MAKE-OPTIMIZED-STRUCTURE-SLOT-VALUE-USING-CLASS-METHOD-FUNCTION
516              CONSTANT-VALUE-P STRUCTURE-SLOTD-ACCESSOR-SYMBOL              GET-BUILT-IN-WRAPPER-SYMBOL
517              USE-DEFAULT-METHOD-ONLY-DFUN-P SFUN-P              FTYPE-DECLARATION-FROM-LAMBDA-LIST COMPUTE-STD-CPL-PHASE-2
518                NO-METHODS-P DO-STANDARD-DEFSETF-1 GET-PV-CELL-FOR-CLASS
519                FGEN-GENSYMS CACHING-P STRUCTURE-TYPE-INCLUDED-TYPE-NAME
520                TWO-CLASS-P GFS-OF-TYPE COUNT-DFUN
521                STRUCTURE-TYPE-SLOT-DESCRIPTION-LIST ARG-INFO-LAMBDA-LIST
522                LEGAL-CLASS-NAME-P MAKE-INITFUNCTION CACHE-P
523                ARG-INFO-PRECEDENCE STRUCTURE-TYPE-P
524                MAKE-OPTIMIZED-STRUCTURE-SETF-SLOT-VALUE-USING-CLASS-METHOD-FUNCTION
525                STRUCTURE-SLOTD-NAME ARG-INFO-METATYPES CONSTANT-VALUE-P
526                ITERATE::VARIABLES-FROM-LET STRUCTURE-SLOTD-ACCESSOR-SYMBOL
527                FGEN-GENERATOR-LAMBDA USE-DEFAULT-METHOD-ONLY-DFUN-P SFUN-P
528                ARG-INFO-NUMBER-OPTIONAL
529              INITIALIZE-INFO-CACHED-COMBINED-INITARGS-FORM-LIST              INITIALIZE-INFO-CACHED-COMBINED-INITARGS-FORM-LIST
530              DEFAULT-SECONDARY-DISPATCH-FUNCTION WRAPPER-FIELD              MAKE-OPTIMIZED-STRUCTURE-SLOT-BOUNDP-USING-CLASS-METHOD-FUNCTION
531              STRUCTURE-SLOTD-WRITER-FUNCTION NEXT-WRAPPER-FIELD              DEFAULT-SECONDARY-DISPATCH-FUNCTION ARG-INFO-KEY/REST-P
532              FIND-CYCLE-REASONS SETFBOUNDP EARLY-CLASS-DEFINITION              INITIALIZE-INFO-P CLASS-OF WRAPPER-FIELD
533              GET-SETF-FUNCTION-NAME ECD-SOURCE              STRUCTURE-SLOTD-WRITER-FUNCTION ONE-INDEX-P
534              VARIABLE-GLOBALLY-SPECIAL-P USE-CACHING-DFUN-P              NEXT-WRAPPER-FIELD ECD-CLASS-NAME FIND-CYCLE-REASONS
535                ARG-INFO-KEYWORDS CHECK-CACHE SETFBOUNDP COPY-CACHE
536                DISPATCH-CACHE CLASS-FROM-TYPE EARLY-CLASS-DEFINITION
537                GF-INFO-SIMPLE-ACCESSOR-TYPE EXPAND-SHORT-DEFCOMBIN
538                DEFAULT-METHOD-ONLY-CACHE GET-SETF-FUNCTION-NAME
539                DNET-METHODS-P ECD-SOURCE ACCESSOR-DFUN-INFO-CACHE
540                USE-CACHING-DFUN-P METHOD-FUNCTION-FROM-FAST-FUNCTION
541              STRUCTURE-SLOTD-TYPE MAKE-PV-TYPE-DECLARATION              STRUCTURE-SLOTD-TYPE MAKE-PV-TYPE-DECLARATION
542              FORMAT-CYCLE-REASONS MAKE-CALLS-TYPE-DECLARATION              ONE-INDEX-DFUN-INFO-CACHE ONE-INDEX-DFUN-INFO-ACCESSOR-TYPE
543              ECD-METACLASS MAP-SPECIALIZERS SYSTEM:%STRUCTURE-NAME              FORMAT-CYCLE-REASONS METHOD-CALL-CALL-METHOD-ARGS
544              CPD-CLASS SLOT-VECTOR-SYMBOL EARLY-CLASS-PRECEDENCE-LIST              MAKE-CALLS-TYPE-DECLARATION KEYWORD-SPEC-NAME ECD-METACLASS
545              MAKE-PERMUTATION-VECTOR SYSTEM:%COMPILED-FUNCTION-NAME              INTERN-EQL-SPECIALIZER N-N-CACHE MAP-SPECIALIZERS
546              METHODS-CONTAIN-EQL-SPECIALIZER-P STRUCTURE-OBJECT-P              GENERIC-CLOBBERS-FUNCTION CPD-CLASS N-N-ACCESSOR-TYPE
547              MAKE-TYPE-PREDICATE EXPAND-MAKE-INSTANCE-FORM CPD-SUPERS              SLOT-VECTOR-SYMBOL DEFAULT-CONSTANT-CONVERTER
548              MAKE-CONSTANT-FUNCTION DEFAULT-TEST-CONVERTER              EARLY-CLASS-PRECEDENCE-LIST FAST-METHOD-CALL-PV-CELL
549              FUNCTION-RETURNING-T EXPAND-LONG-DEFCOMBIN SORT-SLOTS              MAKE-PERMUTATION-VECTOR EXTRACT-LAMBDA-LIST
550              INITIAL-P SORT-CALLS EARLY-CLASS-NAME-OF SYMBOL-PKG-NAME              WRAPPER-FOR-STRUCTURE METHODS-CONTAIN-EQL-SPECIALIZER-P
551              FORCE-CACHE-FLUSHES              ONE-CLASS-CACHE STRUCTURE-OBJECT-P
552                FAST-METHOD-CALL-NEXT-METHOD-CALL MAKE-TYPE-PREDICATE
553                ONE-CLASS-ACCESSOR-TYPE EXPAND-MAKE-INSTANCE-FORM
554                ONE-CLASS-INDEX CPD-SUPERS BUILT-IN-WRAPPER-OF
555                MAKE-CONSTANT-FUNCTION TWO-CLASS-CACHE
556                DEFAULT-TEST-CONVERTER BUILT-IN-OR-STRUCTURE-WRAPPER1
557                FUNCTION-RETURNING-T WALKER::GET-WALKER-TEMPLATE
558                EXPAND-LONG-DEFCOMBIN TWO-CLASS-ACCESSOR-TYPE SORT-SLOTS
559                TWO-CLASS-INDEX INITIAL-P GET-MAKE-INSTANCE-FUNCTION-SYMBOL
560                SORT-CALLS ALLOCATE-CACHE-VECTOR EARLY-CLASS-NAME-OF
561                TWO-CLASS-WRAPPER0 SYMBOL-PKG-NAME
562                FLUSH-CACHE-VECTOR-INTERNAL FORCE-CACHE-FLUSHES
563              CLASS-HAS-A-FORWARD-REFERENCED-SUPERCLASS-P CPD-AFTER              CLASS-HAS-A-FORWARD-REFERENCED-SUPERCLASS-P CPD-AFTER
564              INITIALIZE-INFO-BOUND-SLOTS EARLY-CLASS-SLOTDS              EXTRACT-SPECIALIZER-NAMES INITIALIZE-INFO-BOUND-SLOTS
565              INITIALIZE-INFO-CACHED-VALID-P INITIAL-DISPATCH-P              EARLY-CLASS-SLOTDS INITIALIZE-INFO-CACHED-VALID-P
566              GET-MAKE-INSTANCE-FUNCTIONS DISPATCH-P              INITIAL-DISPATCH-P GET-MAKE-INSTANCE-FUNCTIONS DISPATCH-P
567              STRUCTURE-SLOTD-READER-FUNCTION              STRUCTURE-SLOTD-READER-FUNCTION
568              INITIALIZE-INFO-CACHED-RI-VALID-P              INITIALIZE-INFO-CACHED-RI-VALID-P
569              EARLY-SLOT-DEFINITION-NAME              EARLY-SLOT-DEFINITION-NAME
# Line 586  Line 604 
604              CLASS-PRECEDENCE-DESCRIPTION-P CACHING-DFUN-COST              CLASS-PRECEDENCE-DESCRIPTION-P CACHING-DFUN-COST
605              ONE-CLASS-P INITIAL-CACHE              ONE-CLASS-P INITIAL-CACHE
606              INFORM-TYPE-SYSTEM-ABOUT-STD-CLASS INITIAL-DISPATCH-CACHE              INFORM-TYPE-SYSTEM-ABOUT-STD-CLASS INITIAL-DISPATCH-CACHE
607              UNENCAPSULATED-FDEFINITION              UNENCAPSULATED-FDEFINITION RESET-INITIALIZE-INFO))
             MAKE-DEFAULT-METHOD-GROUP-DESCRIPTION  
             METHOD-FUNCTION-NEEDS-NEXT-METHODS-P DFUN-INFO-P  
             MAKE-OPTIMIZED-STRUCTURE-SLOT-VALUE-USING-CLASS-METHOD-FUNCTION  
             FTYPE-DECLARATION-FROM-LAMBDA-LIST NO-METHODS-P  
             WALKER::ENV-WALK-FUNCTION FGEN-GENSYMS  
             WALKER::GET-IMPLEMENTATION-DEPENDENT-WALKER-TEMPLATE  
             TWO-CLASS-P COUNT-DFUN ARG-INFO-LAMBDA-LIST  
             MAKE-INITFUNCTION ARG-INFO-PRECEDENCE  
             MAKE-OPTIMIZED-STRUCTURE-SETF-SLOT-VALUE-USING-CLASS-METHOD-FUNCTION  
             ARG-INFO-METATYPES ITERATE::VARIABLES-FROM-LET  
             FGEN-GENERATOR-LAMBDA WALKER::ENV-WALK-FORM  
             ARG-INFO-NUMBER-OPTIONAL  
             MAKE-OPTIMIZED-STRUCTURE-SLOT-BOUNDP-USING-CLASS-METHOD-FUNCTION  
             ARG-INFO-KEY/REST-P INITIALIZE-INFO-P ONE-INDEX-P  
             ECD-CLASS-NAME ARG-INFO-KEYWORDS COPY-CACHE  
             GF-INFO-SIMPLE-ACCESSOR-TYPE EXPAND-SHORT-DEFCOMBIN))  
608  (PROCLAIM  (PROCLAIM
609      '(FTYPE (FUNCTION (T *) *) ENSURE-GENERIC-FUNCTION ENSURE-CLASS      '(FTYPE (FUNCTION (T *) *) ENSURE-CLASS CALL-NO-NEXT-METHOD
610                WALK-FORM MACROEXPAND-ALL ENSURE-GENERIC-FUNCTION
611              COERCE-TO-CLASS GET-METHOD-FUNCTION GET-FUNCTION              COERCE-TO-CLASS GET-METHOD-FUNCTION GET-FUNCTION
612              GET-FUNCTION1 PARSE-METHOD-OR-SPEC EXTRACT-DECLARATIONS              GET-FUNCTION1 PARSE-METHOD-OR-SPEC EXTRACT-DECLARATIONS
613              GET-DFUN-CONSTRUCTOR MAP-ALL-CLASSES MAKE-CACHING-DFUN              GET-DFUN-CONSTRUCTOR MAP-ALL-CLASSES MAKE-CACHING-DFUN
614              MAKE-METHOD-FUNCTION-INTERNAL PARSE-SPECIALIZED-LAMBDA-LIST              MAKE-METHOD-FUNCTION-INTERNAL PARSE-SPECIALIZED-LAMBDA-LIST
615              MAKE-METHOD-LAMBDA-INTERNAL MAKE-CONSTANT-VALUE-DFUN              MAKE-METHOD-LAMBDA-INTERNAL MAKE-CONSTANT-VALUE-DFUN
616              MAKE-FINAL-DFUN-INTERNAL COMPILE-LAMBDA DISPATCH-DFUN-COST              MAKE-FINAL-DFUN-INTERNAL COMPILE-LAMBDA DISPATCH-DFUN-COST
617              WALK-FORM MACROEXPAND-ALL MAKE-INSTANCE-1))              MAKE-INSTANCE-1))
618  (PROCLAIM '(FTYPE (FUNCTION (T T *) (VALUES T T)) SYMBOL-APPEND))  (PROCLAIM '(FTYPE (FUNCTION (T T *) (VALUES T T)) SYMBOL-APPEND))
619  (PROCLAIM  (PROCLAIM
620      '(FTYPE (FUNCTION (T T) *) *SUBTYPEP ITERATE::PARSE-DECLARATIONS      '(FTYPE (FUNCTION (T T) *) *SUBTYPEP ITERATE::PARSE-DECLARATIONS
621              INITIAL-DFUN SLOT-BOUNDP SLOT-VALUE SLOT-MAKUNBOUND              INITIAL-DFUN SAUT-CLASS SPECIALIZER-APPLICABLE-USING-TYPE-P
622              SAUT-CLASS SPECIALIZER-APPLICABLE-USING-TYPE-P COMPUTE-TEST              COMPUTE-TEST GET-NEW-FUNCTION-GENERATOR-INTERNAL
623              GET-NEW-FUNCTION-GENERATOR-INTERNAL COMPUTE-CODE              COMPUTE-CODE CLASS-APPLICABLE-USING-CLASS-P SAUT-AND
624              CLASS-APPLICABLE-USING-CLASS-P SAUT-AND SAUT-NOT              SAUT-NOT SAUT-PROTOTYPE DESTRUCTURE ENSURE-CLASS-VALUES
             SAUT-PROTOTYPE DESTRUCTURE ENSURE-CLASS-VALUES  
625              MAKE-DIRECT-SLOTD MAKE-INSTANCE-FUNCTION-TRAP              MAKE-DIRECT-SLOTD MAKE-INSTANCE-FUNCTION-TRAP
626              GENERATE-FAST-CLASS-SLOT-ACCESS-P MUTATE-SLOTS-AND-CALLS              GENERATE-FAST-CLASS-SLOT-ACCESS-P MUTATE-SLOTS-AND-CALLS
627              INVOKE-EMF EMIT-DEFAULT-ONLY-FUNCTION SPLIT-DECLARATIONS              INVOKE-EMF EMIT-DEFAULT-ONLY-FUNCTION SPLIT-DECLARATIONS
# Line 627  Line 629 
629              UPDATE-SLOT-VALUE-GF-INFO EMIT-CACHING SDFUN-FOR-CACHING              UPDATE-SLOT-VALUE-GF-INFO EMIT-CACHING SDFUN-FOR-CACHING
630              SLOT-UNBOUND-INTERNAL SET-FUNCTION-NAME              SLOT-UNBOUND-INTERNAL SET-FUNCTION-NAME
631              COMPUTE-STD-CPL-PHASE-1 FORM-LIST-TO-LISP              COMPUTE-STD-CPL-PHASE-1 FORM-LIST-TO-LISP
632              FIND-SUPERCLASS-CHAIN SAUT-CLASS-EQ              FIND-SUPERCLASS-CHAIN SAUT-CLASS-EQ SLOT-BOUNDP
633              COMPUTE-APPLICABLE-METHODS-USING-TYPES              COMPUTE-APPLICABLE-METHODS-USING-TYPES
634              CHECK-INITARGS-VALUES SAUT-EQL INSURE-DFUN))              CHECK-INITARGS-VALUES SAUT-EQL INSURE-DFUN SLOT-VALUE
635                SLOT-MAKUNBOUND))
636  (PROCLAIM  (PROCLAIM
637      '(FTYPE (FUNCTION (T *) T) FIND-CLASS CAPITALIZE-WORDS      '(FTYPE (FUNCTION (T *) T) FIND-CLASS CAPITALIZE-WORDS
638              INITIALIZE-INTERNAL-SLOT-GFS MAKE-TYPE-PREDICATE-NAME              INITIALIZE-INTERNAL-SLOT-GFS MAKE-TYPE-PREDICATE-NAME
# Line 644  Line 647 
647              ITERATE::FUNCTION-LAMBDA-P ITERATE::MAYBE-WARN              ITERATE::FUNCTION-LAMBDA-P ITERATE::MAYBE-WARN
648              MAKE-WRAPPER))              MAKE-WRAPPER))
649  (PROCLAIM  (PROCLAIM
650      '(FTYPE (FUNCTION (T T) T) DO-SATISFIES-DEFTYPE      '(FTYPE (FUNCTION (T T) T) STANDARD-INSTANCE-ACCESS REMOVE-METHOD
651              MEMF-CONSTANT-CONVERTER COMPUTE-CONSTANTS              SET-FUNCALLABLE-INSTANCE-FUNCTION
652                SYSTEM:%SET-COMPILED-FUNCTION-NAME
653              CLASS-CAN-PRECEDE-P SAUT-NOT-CLASS SAUT-NOT-CLASS-EQ              CLASS-CAN-PRECEDE-P SAUT-NOT-CLASS SAUT-NOT-CLASS-EQ
654              SAUT-NOT-PROTOTYPE GF-MAKE-FUNCTION-FROM-EMF SAUT-NOT-EQL              SAUT-NOT-PROTOTYPE GF-MAKE-FUNCTION-FROM-EMF SAUT-NOT-EQL
655              SUPERCLASSES-COMPATIBLE-P CLASSES-HAVE-COMMON-SUBCLASS-P              SUPERCLASSES-COMPATIBLE-P CLASSES-HAVE-COMMON-SUBCLASS-P
# Line 654  Line 658 
658              METHOD-FUNCTION-RETURNING-T VARIABLE-CLASS MAKE-PLIST              METHOD-FUNCTION-RETURNING-T VARIABLE-CLASS MAKE-PLIST
659              REMTAIL DESTRUCTURE-INTERNAL ACCESSOR-MISS-FUNCTION              REMTAIL DESTRUCTURE-INTERNAL ACCESSOR-MISS-FUNCTION
660              UPDATE-INITIALIZE-INFO-INTERNAL N-N-DFUN-INFO MAKE-CAXR              UPDATE-INITIALIZE-INFO-INTERNAL N-N-DFUN-INFO MAKE-CAXR
661              MAKE-CDXR CHECKING-DFUN-INFO MAKE-PV-TABLE-INTERNAL              MAKE-CDXR VARIABLE-LEXICAL-P CHECKING-DFUN-INFO
662                VARIABLE-SPECIAL-P MAKE-PV-TABLE-INTERNAL
663              FIND-SLOT-DEFINITION WALKER::WALK-REPEAT-EVAL              FIND-SLOT-DEFINITION WALKER::WALK-REPEAT-EVAL
664              WALKER::NOTE-DECLARATION MAKE-DFUN-LAMBDA-LIST              WALKER::NOTE-DECLARATION MAKE-DFUN-LAMBDA-LIST
665              WALKER::NOTE-LEXICAL-BINDING MAKE-DLAP-LAMBDA-LIST              WALKER::NOTE-LEXICAL-BINDING MAKE-DLAP-LAMBDA-LIST
666              ADD-DIRECT-SUBCLASSES COMPUTE-PV MAKE-DFUN-ARG-LIST              WALKER::ENVIRONMENT-FUNCTION ADD-DIRECT-SUBCLASSES
667              COMPUTE-CALLS MAKE-FAST-METHOD-CALL-LAMBDA-LIST              COMPUTE-PV MAKE-DFUN-ARG-LIST COMPUTE-CALLS
668              UPDATE-ALL-PV-TABLE-CACHES UPDATE-CLASS              UPDATE-ALL-PV-TABLE-CACHES
669                MAKE-FAST-METHOD-CALL-LAMBDA-LIST UPDATE-CLASS
670              MAP-PV-TABLE-REFERENCES-OF ADD-SLOT-ACCESSORS              MAP-PV-TABLE-REFERENCES-OF ADD-SLOT-ACCESSORS
671              WALKER::ENVIRONMENT-FUNCTION REMOVE-DIRECT-SUBCLASSES              REMOVE-DIRECT-SUBCLASSES REMOVE-SLOT-ACCESSORS SYMBOL-LESSP
672              REMOVE-SLOT-ACCESSORS SYMBOL-LESSP SYMBOL-OR-CONS-LESSP              SYMBOL-OR-CONS-LESSP PV-WRAPPERS-FROM-ALL-ARGS
673              |SETF PCL FIND-CLASS| |SETF PCL FIND-CLASS-PREDICATE|              PV-TABLE-LOOKUP UPDATE-CPL UPDATE-SLOTS PROCLAIM-DEFGENERIC
674              PV-WRAPPERS-FROM-ALL-ARGS PV-TABLE-LOOKUP UPDATE-CPL              UPDATE-INITS LIST-EQ COMPUTE-APPLICABLE-METHODS-FUNCTION
             UPDATE-SLOTS PROCLAIM-DEFGENERIC UPDATE-INITS LIST-EQ  
             COMPUTE-APPLICABLE-METHODS-FUNCTION  
675              UPDATE-STD-OR-STR-METHODS SET-STANDARD-SVUC-METHOD              UPDATE-STD-OR-STR-METHODS SET-STANDARD-SVUC-METHOD
676              EMIT-1-NIL-DLAP PLIST-VALUE COMPUTE-LAYOUT              EMIT-1-NIL-DLAP PLIST-VALUE COMPUTE-LAYOUT
677              SET-STRUCTURE-SVUC-METHOD              SET-STRUCTURE-SVUC-METHOD
# Line 675  Line 679 
679              MEC-ALL-CLASSES-INTERNAL NO-SLOT              MEC-ALL-CLASSES-INTERNAL NO-SLOT
680              EMIT-N-WRAPPER-COMPUTE-PRIMARY-CACHE-LOCATION              EMIT-N-WRAPPER-COMPUTE-PRIMARY-CACHE-LOCATION
681              MEC-ALL-CLASSES %SET-CCLOSURE-ENV MEC-ALL-CLASS-LISTS              MEC-ALL-CLASSES %SET-CCLOSURE-ENV MEC-ALL-CLASS-LISTS
682              REMOVE-METHOD REDEFINE-FUNCTION METHODS-CONVERTER              REDEFINE-FUNCTION METHODS-CONVERTER
683              ADD-METHOD PV-WRAPPERS-FROM-ALL-WRAPPERS              PV-WRAPPERS-FROM-ALL-WRAPPERS NET-CONSTANT-CONVERTER
684              NET-CONSTANT-CONVERTER AUGMENT-TYPE CHANGE-CLASS-INTERNAL              AUGMENT-TYPE VALUE-FOR-CACHING GET-KEY-ARG GET-KEY-ARG1
685              VALUE-FOR-CACHING |SETF PCL METHOD-FUNCTION-PLIST|              SET-METHODS SET-FUNCTION-PRETTY-ARGLIST
686              GET-KEY-ARG GET-KEY-ARG1 SET-METHODS              FIND-STANDARD-II-METHOD MAKE-EARLY-ACCESSOR
             SET-FUNCTION-PRETTY-ARGLIST FIND-STANDARD-II-METHOD  
             SET-FUNCALLABLE-INSTANCE-FUNCTION MAKE-EARLY-ACCESSOR  
687              DOCTOR-DFUN-FOR-THE-DEBUGGER COMPUTE-STD-CPL              DOCTOR-DFUN-FOR-THE-DEBUGGER COMPUTE-STD-CPL
688              |SETF PCL GDEFINITION| MAKE-DISCRIMINATING-FUNCTION-ARGLIST              MAKE-DISCRIMINATING-FUNCTION-ARGLIST ADD-FORMS
689              ADD-FORMS CPL-INCONSISTENT-ERROR              CPL-INCONSISTENT-ERROR REDIRECT-EARLY-FUNCTION-INTERNAL
690              REDIRECT-EARLY-FUNCTION-INTERNAL ADD-TO-CVECTOR              ADD-TO-CVECTOR BOOTSTRAP-SLOT-INDEX QUALIFIER-CHECK-RUNTIME
             BOOTSTRAP-SLOT-INDEX QUALIFIER-CHECK-RUNTIME  
             FUNCALLABLE-STANDARD-INSTANCE-ACCESS  
691              CPL-FORWARD-REFERENCED-CLASS-ERROR REAL-REMOVE-METHOD              CPL-FORWARD-REFERENCED-CLASS-ERROR REAL-REMOVE-METHOD
692              WALKER::ENVIRONMENT-MACRO CANONICALIZE-SLOT-SPECIFICATION              WALKER::ENVIRONMENT-MACRO CANONICALIZE-SLOT-SPECIFICATION
693              CANONICALIZE-DEFCLASS-OPTION SET-WRAPPER              CANONICALIZE-DEFCLASS-OPTION SET-WRAPPER
694              DEAL-WITH-ARGUMENTS-OPTION PARSE-QUALIFIER-PATTERN              DEAL-WITH-ARGUMENTS-OPTION PARSE-QUALIFIER-PATTERN
695              SLOT-EXISTS-P SWAP-WRAPPERS-AND-SLOTS ITERATE::MV-SETQ              SWAP-WRAPPERS-AND-SLOTS ITERATE::MV-SETQ
696              MAKE-UNORDERED-METHODS-EMF CLASS-MIGHT-PRECEDE-P              MAKE-UNORDERED-METHODS-EMF CLASS-MIGHT-PRECEDE-P
697              ITERATE::EXTRACT-SPECIAL-BINDINGS              ITERATE::EXTRACT-SPECIAL-BINDINGS ADD-METHOD
698              WALKER::VARIABLE-SYMBOL-MACRO-P VARIABLE-LEXICAL-P              WALKER::VARIABLE-SYMBOL-MACRO-P RAISE-METATYPE
             RAISE-METATYPE VARIABLE-SPECIAL-P STANDARD-INSTANCE-ACCESS  
699              PROCLAIM-DEFMETHOD FDEFINE-CAREFULLY              PROCLAIM-DEFMETHOD FDEFINE-CAREFULLY
700              MAKE-INTERNAL-READER-METHOD-FUNCTION              MAKE-INTERNAL-READER-METHOD-FUNCTION
701              MAKE-STD-READER-METHOD-FUNCTION              MAKE-STD-READER-METHOD-FUNCTION
702              MAKE-STD-WRITER-METHOD-FUNCTION              MAKE-STD-WRITER-METHOD-FUNCTION
703              ITERATE::SIMPLE-EXPAND-ITERATE-FORM              ITERATE::SIMPLE-EXPAND-ITERATE-FORM
704              MAKE-STD-BOUNDP-METHOD-FUNCTION              MAKE-STD-BOUNDP-METHOD-FUNCTION DO-SATISFIES-DEFTYPE
705              SYSTEM:%SET-COMPILED-FUNCTION-NAME))              MEMF-CONSTANT-CONVERTER COMPUTE-CONSTANTS
706                FUNCALLABLE-STANDARD-INSTANCE-ACCESS SLOT-EXISTS-P))
707  (PROCLAIM '(FTYPE (FUNCTION NIL FIXNUM) GET-WRAPPER-CACHE-NUMBER))  (PROCLAIM '(FTYPE (FUNCTION NIL FIXNUM) GET-WRAPPER-CACHE-NUMBER))
708  (IN-PACKAGE "PCL")  (IN-PACKAGE "PCL")
709    
710  (DOLIST (V '(|(FAST-WRITER-METHOD SLOT-OBJECT FROM-DEFCLASS-P)|  (DOLIST (V '(|(FAST-WRITER-METHOD SLOT-OBJECT OPTIONS)|
                 |(FAST-WRITER-METHOD SLOT-OBJECT DIRECT-METHODS)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT SLOTS)|  
                 |(FAST-WRITER-METHOD SLOT-CLASS SLOTS)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT DIRECT-SLOTS)|  
                 |(FAST-WRITER-METHOD SLOT-CLASS DIRECT-SLOTS)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT METHODS)|  
711                  |(FAST-WRITER-METHOD STANDARD-GENERIC-FUNCTION METHODS)|                  |(FAST-WRITER-METHOD STANDARD-GENERIC-FUNCTION METHODS)|
712                  |(FAST-WRITER-METHOD SLOT-OBJECT OPTIONS)|                  |(FAST-WRITER-METHOD SLOT-OBJECT METHODS)|
713                  |(FAST-WRITER-METHOD SLOT-OBJECT DIRECT-SUBCLASSES)|                  |(FAST-WRITER-METHOD SLOT-CLASS DIRECT-SLOTS)|
714                    |(FAST-WRITER-METHOD SLOT-OBJECT DIRECT-SLOTS)|
715                    |(FAST-WRITER-METHOD SLOT-CLASS SLOTS)|
716                    |(FAST-WRITER-METHOD SLOT-OBJECT SLOTS)|
717                    |(FAST-WRITER-METHOD SLOT-OBJECT DIRECT-METHODS)|
718                    |(FAST-WRITER-METHOD SLOT-OBJECT FROM-DEFCLASS-P)|
719                  |(FAST-WRITER-METHOD SLOT-OBJECT DIRECT-SUPERCLASSES)|                  |(FAST-WRITER-METHOD SLOT-OBJECT DIRECT-SUPERCLASSES)|
720                    |(FAST-WRITER-METHOD SLOT-OBJECT DIRECT-SUBCLASSES)|
721                  ADD-READER-METHOD                  ADD-READER-METHOD
722                  SHORT-COMBINATION-IDENTITY-WITH-ONE-ARGUMENT                  SHORT-COMBINATION-IDENTITY-WITH-ONE-ARGUMENT
723                  REMOVE-READER-METHOD |LISP::T class predicate|                  REMOVE-READER-METHOD |LISP::T class predicate|
724                  EQL-SPECIALIZER-P |(SETF GENERIC-FUNCTION-NAME)|                  EQL-SPECIALIZER-P |(SETF GENERIC-FUNCTION-NAME)|
725                  OBJECT-PLIST SLOT-DEFINITION-DEFSTRUCT-ACCESSOR-SYMBOL                  OBJECT-PLIST SLOT-DEFINITION-DEFSTRUCT-ACCESSOR-SYMBOL
                 |PCL::STANDARD-OBJECT class predicate|  
                 |PCL::STANDARD-SLOT-DEFINITION class predicate|  
                 |PCL::STANDARD-DIRECT-SLOT-DEFINITION class predicate|  
                 |PCL::STANDARD-EFFECTIVE-SLOT-DEFINITION class predicate|  
726                  |PCL::STANDARD-METHOD-COMBINATION class predicate|                  |PCL::STANDARD-METHOD-COMBINATION class predicate|
727                    |PCL::STANDARD-EFFECTIVE-SLOT-DEFINITION class predicate|
728                    |PCL::STANDARD-DIRECT-SLOT-DEFINITION class predicate|
729                    |PCL::STANDARD-SLOT-DEFINITION class predicate|
730                    |PCL::STANDARD-OBJECT class predicate|
731                  |(FAST-READER-METHOD SLOT-OBJECT METHOD)|                  |(FAST-READER-METHOD SLOT-OBJECT METHOD)|
732                  |PCL::BUILT-IN-CLASS class predicate| SPECIALIZER-TYPE                  |PCL::BUILT-IN-CLASS class predicate| SPECIALIZER-TYPE
733                  |LISP::RATIO class predicate|                  |LISP::RATIONAL class predicate|
734                  |LISP::RATIONAL class predicate| GF-DFUN-STATE                  |LISP::RATIO class predicate| GF-DFUN-STATE
735                  |(SETF GENERIC-FUNCTION-METHOD-CLASS)|                  |(SETF GENERIC-FUNCTION-METHOD-CLASS)|
                 |(FAST-READER-METHOD SLOT-OBJECT DEFSTRUCT-ACCESSOR-SYMBOL)|  
736                  |(FAST-READER-METHOD STRUCTURE-SLOT-DEFINITION DEFSTRUCT-ACCESSOR-SYMBOL)|                  |(FAST-READER-METHOD STRUCTURE-SLOT-DEFINITION DEFSTRUCT-ACCESSOR-SYMBOL)|
737                    |(FAST-READER-METHOD SLOT-OBJECT DEFSTRUCT-ACCESSOR-SYMBOL)|
738                  |(SETF GENERIC-FUNCTION-METHOD-COMBINATION)|                  |(SETF GENERIC-FUNCTION-METHOD-COMBINATION)|
739                  CLASS-DEFSTRUCT-CONSTRUCTOR                  CLASS-DEFSTRUCT-CONSTRUCTOR
                 |(FAST-READER-METHOD SLOT-OBJECT SOURCE)|  
740                  |(FAST-READER-METHOD DEFINITION-SOURCE-MIXIN SOURCE)|                  |(FAST-READER-METHOD DEFINITION-SOURCE-MIXIN SOURCE)|
741                  METHOD-FAST-FUNCTION |(SETF GENERIC-FUNCTION-METHODS)|                  |(FAST-READER-METHOD SLOT-OBJECT SOURCE)|
742                    METHOD-FAST-FUNCTION
743                    |(SETF GENERIC-FUNCTION-DECLARATIONS)|
744                    |(SETF GENERIC-FUNCTION-METHODS)|
745                  |(SETF GF-PRETTY-ARGLIST)|                  |(SETF GF-PRETTY-ARGLIST)|
                 |(FAST-READER-METHOD SLOT-OBJECT INITIALIZE-INFO)|  
                 |(FAST-READER-METHOD SLOT-CLASS INITIALIZE-INFO)|  
                 |(FAST-READER-METHOD SLOT-OBJECT ARG-INFO)|  
746                  |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION ARG-INFO)|                  |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION ARG-INFO)|
747                    |(FAST-READER-METHOD SLOT-OBJECT ARG-INFO)|
748                    |(FAST-READER-METHOD SLOT-CLASS INITIALIZE-INFO)|
749                    |(FAST-READER-METHOD SLOT-OBJECT INITIALIZE-INFO)|
750                  SPECIALIZERP EXACT-CLASS-SPECIALIZER-P                  SPECIALIZERP EXACT-CLASS-SPECIALIZER-P
                 |(FAST-READER-METHOD SLOT-OBJECT WRAPPER)|  
751                  |(FAST-READER-METHOD PCL-CLASS WRAPPER)|                  |(FAST-READER-METHOD PCL-CLASS WRAPPER)|
752                  |(FAST-READER-METHOD SLOT-OBJECT INITARGS)|                  |(FAST-READER-METHOD SLOT-OBJECT WRAPPER)|
753                  |(FAST-READER-METHOD SLOT-DEFINITION INITARGS)|                  |(FAST-READER-METHOD SLOT-DEFINITION INITARGS)|
754                  |(FAST-READER-METHOD SHORT-METHOD-COMBINATION OPERATOR)|                  |(FAST-READER-METHOD SLOT-OBJECT INITARGS)|
                 |(FAST-READER-METHOD SLOT-OBJECT OPERATOR)|  
                 |(FAST-READER-METHOD SLOT-OBJECT DEFSTRUCT-CONSTRUCTOR)|  
755                  |(FAST-READER-METHOD STRUCTURE-CLASS DEFSTRUCT-CONSTRUCTOR)|                  |(FAST-READER-METHOD STRUCTURE-CLASS DEFSTRUCT-CONSTRUCTOR)|
756                  COMPATIBLE-META-CLASS-CHANGE-P                  |(FAST-READER-METHOD SLOT-OBJECT DEFSTRUCT-CONSTRUCTOR)|
757                    |(FAST-READER-METHOD SLOT-OBJECT OPERATOR)|
758                    |(FAST-READER-METHOD SHORT-METHOD-COMBINATION OPERATOR)|
759                  |LISP::CHARACTER class predicate|                  |LISP::CHARACTER class predicate|
760                    COMPATIBLE-META-CLASS-CHANGE-P
761                  |LISP::SEQUENCE class predicate|                  |LISP::SEQUENCE class predicate|
                 |(FAST-READER-METHOD SLOT-OBJECT CLASS-EQ-SPECIALIZER)|  
762                  |(FAST-READER-METHOD CLASS CLASS-EQ-SPECIALIZER)|                  |(FAST-READER-METHOD CLASS CLASS-EQ-SPECIALIZER)|
763                    |(FAST-READER-METHOD SLOT-OBJECT CLASS-EQ-SPECIALIZER)|
764                  |(BOUNDP READER-FUNCTION)| |(BOUNDP PREDICATE-NAME)|                  |(BOUNDP READER-FUNCTION)| |(BOUNDP PREDICATE-NAME)|
765                  |(BOUNDP READERS)| UPDATE-GF-DFUN                  |(BOUNDP READERS)| UPDATE-GF-DFUN
766                  |(BOUNDP CLASS-PRECEDENCE-LIST)|                  |(BOUNDP CLASS-PRECEDENCE-LIST)|
767                  |(BOUNDP ACCESSOR-FLAGS)| |(BOUNDP LOCATION)|                  |(BOUNDP ACCESSOR-FLAGS)| |(BOUNDP DOCUMENTATION)|
768                  |(BOUNDP DOCUMENTATION)| SPECIALIZER-OBJECT                  |(BOUNDP LOCATION)| SPECIALIZER-OBJECT
769                  |(BOUNDP INCOMPATIBLE-SUPERCLASS-LIST)|                  |(BOUNDP INCOMPATIBLE-SUPERCLASS-LIST)|
770                  ACCESSOR-METHOD-SLOT-NAME |(BOUNDP SPECIALIZERS)|                  LONG-METHOD-COMBINATION-P ACCESSOR-METHOD-SLOT-NAME
771                    |(BOUNDP SPECIALIZERS)|
772                  |(BOUNDP IDENTITY-WITH-ONE-ARGUMENT)|                  |(BOUNDP IDENTITY-WITH-ONE-ARGUMENT)|
773                  |(FAST-BOUNDP-METHOD SLOT-OBJECT DEFSTRUCT-ACCESSOR-SYMBOL)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT DEFSTRUCT-ACCESSOR-SYMBOL)|
774                  SPECIALIZER-CLASS |(BOUNDP PRETTY-ARGLIST)|                  SPECIALIZER-CLASS |(BOUNDP PRETTY-ARGLIST)|
# Line 776  Line 779 
779                  CLASS-EQ-SPECIALIZER-P                  CLASS-EQ-SPECIALIZER-P
780                  |(FAST-BOUNDP-METHOD SLOT-OBJECT SOURCE)| SLOTS-FETCHER                  |(FAST-BOUNDP-METHOD SLOT-OBJECT SOURCE)| SLOTS-FETCHER
781                  |(SETF SLOT-ACCESSOR-STD-P)| REMOVE-WRITER-METHOD                  |(SETF SLOT-ACCESSOR-STD-P)| REMOVE-WRITER-METHOD
782                  |(BOUNDP WRITER-FUNCTION)| |(BOUNDP INITFUNCTION)|                  |(BOUNDP INITFUNCTION)| |(BOUNDP WRITER-FUNCTION)|
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT INITIALIZE-INFO)|  
783                  |(FAST-BOUNDP-METHOD SLOT-OBJECT ARG-INFO)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT ARG-INFO)|
784                    |(FAST-BOUNDP-METHOD SLOT-OBJECT INITIALIZE-INFO)|
785                  STRUCTURE-CLASS-P |(BOUNDP WRITERS)|                  STRUCTURE-CLASS-P |(BOUNDP WRITERS)|
786                  |(BOUNDP INITFORM)|                  |(BOUNDP INITFORM)|
787                  |(FAST-BOUNDP-METHOD SLOT-OBJECT WRAPPER)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT WRAPPER)|
# Line 788  Line 791 
791                  UPDATE-CONSTRUCTORS |(BOUNDP SLOT-NAME)|                  UPDATE-CONSTRUCTORS |(BOUNDP SLOT-NAME)|
792                  |(SETF SLOT-DEFINITION-INITARGS)| |(BOUNDP ALLOCATION)|                  |(SETF SLOT-DEFINITION-INITARGS)| |(BOUNDP ALLOCATION)|
793                  |(FAST-BOUNDP-METHOD SLOT-OBJECT CLASS-EQ-SPECIALIZER)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT CLASS-EQ-SPECIALIZER)|
794                  DOCUMENTATION |(BOUNDP FUNCTION)|                  DOCUMENTATION |(BOUNDP GENERIC-FUNCTION)|
795                  |(BOUNDP GENERIC-FUNCTION)| |(BOUNDP LAMBDA-LIST)|                  |(BOUNDP FUNCTION)| |(BOUNDP LAMBDA-LIST)|
796                  METHOD-PRETTY-ARGLIST |(BOUNDP SLOT-DEFINITION)|                  METHOD-PRETTY-ARGLIST |(BOUNDP SLOT-DEFINITION)|
797                  |LISP::ARRAY class predicate|                  |LISP::ARRAY class predicate|
798                  |(BOUNDP CAN-PRECEDE-LIST)| |(BOUNDP PROTOTYPE)|                  |(BOUNDP CAN-PRECEDE-LIST)| |(BOUNDP PROTOTYPE)|
# Line 802  Line 805 
805                  |(CALL STANDARD-COMPUTE-EFFECTIVE-METHOD)|                  |(CALL STANDARD-COMPUTE-EFFECTIVE-METHOD)|
806                  |(BOUNDP FAST-FUNCTION)|                  |(BOUNDP FAST-FUNCTION)|
807                  |LISP::COMPLEX class predicate| |(BOUNDP METHOD-CLASS)|                  |LISP::COMPLEX class predicate| |(BOUNDP METHOD-CLASS)|
808                  |(READER SOURCE)| |(BOUNDP INTERNAL-WRITER-FUNCTION)|                  |(READER SOURCE)| |(BOUNDP METHOD-COMBINATION)|
809                  |(BOUNDP INTERNAL-READER-FUNCTION)|                  |(BOUNDP INTERNAL-READER-FUNCTION)|
810                  |(BOUNDP METHOD-COMBINATION)| ACCESSOR-METHOD-CLASS                  |(BOUNDP INTERNAL-WRITER-FUNCTION)|
811                  |(BOUNDP DIRECT-SLOTS)| |(BOUNDP DIRECT-METHODS)|                  ACCESSOR-METHOD-CLASS |(BOUNDP DIRECT-METHODS)|
812                  |(BOUNDP BOUNDP-FUNCTION)| |(BOUNDP DIRECT-SUBCLASSES)|                  |(BOUNDP DIRECT-SLOTS)| |(BOUNDP BOUNDP-FUNCTION)|
813                  |(BOUNDP DIRECT-SUPERCLASSES)| |(BOUNDP METHODS)|                  |(BOUNDP DIRECT-SUPERCLASSES)|
814                  |(BOUNDP OPTIONS)| |(WRITER METHOD)|                  |(BOUNDP DIRECT-SUBCLASSES)| |(BOUNDP OPTIONS)|
815                    |(BOUNDP METHODS)| |(WRITER METHOD)|
816                  |LISP::BUILT-IN-CLASS class predicate|                  |LISP::BUILT-IN-CLASS class predicate|
817                  |PCL::DEPENDENT-UPDATE-MIXIN class predicate|                  |PCL::DEPENDENT-UPDATE-MIXIN class predicate|
818                  GENERIC-FUNCTION-PRETTY-ARGLIST |(WRITER SOURCE)|                  GENERIC-FUNCTION-PRETTY-ARGLIST |(WRITER SOURCE)|
                 |(FAST-METHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS (STANDARD-OBJECT STANDARD-OBJECT))|  
819                  |(FAST-METHOD INITIALIZE-INSTANCE (SLOT-OBJECT))|                  |(FAST-METHOD INITIALIZE-INSTANCE (SLOT-OBJECT))|
820                  |(FAST-METHOD SLOTS-TO-INSPECT (SLOT-CLASS SLOT-OBJECT))|                  |(FAST-METHOD SLOTS-TO-INSPECT (SLOT-CLASS SLOT-OBJECT))|
821                  |(FAST-METHOD REINITIALIZE-INSTANCE (SLOT-OBJECT))|                  |(FAST-METHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS (STANDARD-OBJECT STANDARD-OBJECT))|
822                  |(FAST-METHOD SPECIALIZER-DIRECT-METHODS (SPECIALIZER-WITH-OBJECT))|                  |(FAST-METHOD SPECIALIZER-DIRECT-METHODS (SPECIALIZER-WITH-OBJECT))|
823                  |(FAST-METHOD SPECIALIZER-DIRECT-GENERIC-FUNCTIONS (SPECIALIZER-WITH-OBJECT))|                  |(FAST-METHOD SPECIALIZER-DIRECT-GENERIC-FUNCTIONS (SPECIALIZER-WITH-OBJECT))|
824                  |(FAST-METHOD SAME-SPECIALIZER-P (SPECIALIZER SPECIALIZER))|                  |(FAST-METHOD REINITIALIZE-INSTANCE (SLOT-OBJECT))|
                 |(FAST-METHOD SAME-SPECIALIZER-P (CLASS-EQ-SPECIALIZER CLASS-EQ-SPECIALIZER))|  
                 |(FAST-METHOD SAME-SPECIALIZER-P (EQL-SPECIALIZER EQL-SPECIALIZER))|  
825                  |(FAST-METHOD SPECIALIZER-CLASS (EQL-SPECIALIZER))|                  |(FAST-METHOD SPECIALIZER-CLASS (EQL-SPECIALIZER))|
826                  |(FAST-METHOD SPECIALIZER-METHOD-TABLE (EQL-SPECIALIZER))|                  |(FAST-METHOD SPECIALIZER-METHOD-TABLE (EQL-SPECIALIZER))|
827                  |(FAST-METHOD SPECIALIZER-METHOD-TABLE (CLASS-EQ-SPECIALIZER))|                  |(FAST-METHOD SPECIALIZER-METHOD-TABLE (CLASS-EQ-SPECIALIZER))|
828                    |(FAST-METHOD SAME-SPECIALIZER-P (SPECIALIZER SPECIALIZER))|
829                    |(FAST-METHOD SAME-SPECIALIZER-P (CLASS-EQ-SPECIALIZER CLASS-EQ-SPECIALIZER))|
830                    |(FAST-METHOD SAME-SPECIALIZER-P (EQL-SPECIALIZER EQL-SPECIALIZER))|
831                  MAKE-BOUNDP-METHOD-FUNCTION                  MAKE-BOUNDP-METHOD-FUNCTION
832                  |LISP::STRING class predicate|                  |LISP::STRING class predicate|
833                  |(FAST-METHOD (SETF DOCUMENTATION) (T DOCUMENTATION-MIXIN))|                  |(FAST-METHOD (SETF DOCUMENTATION) (T DOCUMENTATION-MIXIN))|
834                  |(FAST-METHOD DOCUMENTATION (DOCUMENTATION-MIXIN))|                  |(FAST-METHOD DOCUMENTATION (DOCUMENTATION-MIXIN))|
835                  |PCL::METAOBJECT class predicate|                  |PCL::METAOBJECT class predicate|
836                  |(FAST-METHOD (SETF SLOT-VALUE-USING-CLASS) (T STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|                  |(FAST-METHOD (SETF SLOT-VALUE-USING-CLASS) (T STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|
837                  |(FAST-METHOD SLOT-MAKUNBOUND-USING-CLASS (STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|                  |(FAST-METHOD MAKE-INSTANCE (SYMBOL))|
838                  |(FAST-METHOD SLOT-BOUNDP-USING-CLASS (STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|                  |(FAST-METHOD DOCUMENTATION (STANDARD-SLOT-DEFINITION))|
839                  |(FAST-METHOD SLOT-MAKUNBOUND-USING-CLASS (STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|                  |(FAST-METHOD CHANGE-CLASS (T SYMBOL))|
840                  |(FAST-METHOD SLOT-BOUNDP-USING-CLASS (STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|                  |(FAST-METHOD (SETF DOCUMENTATION) (T STANDARD-SLOT-DEFINITION))|
841                  |(FAST-METHOD GF-FAST-METHOD-FUNCTION-P (STANDARD-GENERIC-FUNCTION))|                  |(FAST-METHOD SLOT-VALUE-USING-CLASS (STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|
842                  |(FAST-METHOD GENERIC-FUNCTION-LAMBDA-LIST (GENERIC-FUNCTION))|                  |(FAST-METHOD SLOT-VALUE-USING-CLASS (STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|
                 |(FAST-METHOD METHOD-QUALIFIERS (STANDARD-METHOD))|  
                 |(FAST-METHOD ACCESSOR-METHOD-CLASS (STANDARD-WRITER-METHOD))|  
                 |(FAST-METHOD ACCESSOR-METHOD-CLASS (STANDARD-ACCESSOR-METHOD))|  
843                  |(FAST-METHOD METHOD-LAMBDA-LIST (TRACED-METHOD))|                  |(FAST-METHOD METHOD-LAMBDA-LIST (TRACED-METHOD))|
844                  |(FAST-METHOD METHOD-SPECIALIZERS (TRACED-METHOD))|                  |(FAST-METHOD METHOD-SPECIALIZERS (TRACED-METHOD))|
845                  |(FAST-METHOD METHOD-QUALIFIERS (TRACED-METHOD))|                  |(FAST-METHOD METHOD-QUALIFIERS (TRACED-METHOD))|
# Line 849  Line 850 
850                  |(FAST-METHOD MAKE-INSTANCES-OBSOLETE (SYMBOL))|                  |(FAST-METHOD MAKE-INSTANCES-OBSOLETE (SYMBOL))|
851                  |(FAST-METHOD METHOD-FUNCTION (STANDARD-METHOD))|                  |(FAST-METHOD METHOD-FUNCTION (STANDARD-METHOD))|
852                  |(FAST-METHOD COMPUTE-DISCRIMINATING-FUNCTION-ARGLIST-INFO (STANDARD-GENERIC-FUNCTION))|                  |(FAST-METHOD COMPUTE-DISCRIMINATING-FUNCTION-ARGLIST-INFO (STANDARD-GENERIC-FUNCTION))|
853                  |(FAST-METHOD (SETF DOCUMENTATION) (T STANDARD-SLOT-DEFINITION))|                  |(FAST-METHOD (SETF SLOT-VALUE-USING-CLASS) (T STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|
854                  |(FAST-METHOD SLOT-VALUE-USING-CLASS (STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|                  |(FAST-METHOD SLOT-BOUNDP-USING-CLASS (STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|
855                  |(FAST-METHOD SLOT-VALUE-USING-CLASS (STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|                  |(FAST-METHOD SLOT-MAKUNBOUND-USING-CLASS (STD-CLASS STANDARD-OBJECT STANDARD-EFFECTIVE-SLOT-DEFINITION))|
856                  |(FAST-METHOD MAKE-INSTANCE (SYMBOL))|                  |(FAST-METHOD SLOT-BOUNDP-USING-CLASS (STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|
857                  |(FAST-METHOD DOCUMENTATION (STANDARD-SLOT-DEFINITION))|                  |(FAST-METHOD SLOT-MAKUNBOUND-USING-CLASS (STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|
858                  |(FAST-METHOD CHANGE-CLASS (T SYMBOL))|                  |(FAST-METHOD GENERIC-FUNCTION-PRETTY-ARGLIST (STANDARD-GENERIC-FUNCTION))|
859                  |(FAST-METHOD (SETF SLOT-VALUE-USING-CLASS) (T STRUCTURE-CLASS STRUCTURE-OBJECT STRUCTURE-EFFECTIVE-SLOT-DEFINITION))|                  |(FAST-METHOD INITIALIZE-INTERNAL-SLOT-FUNCTIONS (EFFECTIVE-SLOT-DEFINITION))|
860                    |(FAST-METHOD SLOT-DEFINITION-ALLOCATION (STRUCTURE-SLOT-DEFINITION))|
861                    |(FAST-METHOD ACCESSOR-METHOD-CLASS (STANDARD-ACCESSOR-METHOD))|
862                    |(FAST-METHOD ACCESSOR-METHOD-CLASS (STANDARD-WRITER-METHOD))|
863                    |(FAST-METHOD METHOD-QUALIFIERS (STANDARD-METHOD))|
864                    |(FAST-METHOD GENERIC-FUNCTION-LAMBDA-LIST (GENERIC-FUNCTION))|
865                    |(FAST-METHOD GF-FAST-METHOD-FUNCTION-P (STANDARD-GENERIC-FUNCTION))|
866                  |(FAST-METHOD ADD-DIRECT-METHOD (CLASS METHOD))|                  |(FAST-METHOD ADD-DIRECT-METHOD (CLASS METHOD))|
867                  |(FAST-METHOD REMOVE-DIRECT-METHOD (CLASS METHOD))|                  |(FAST-METHOD REMOVE-DIRECT-METHOD (CLASS METHOD))|
868                  |(FAST-METHOD ADD-DIRECT-METHOD (SPECIALIZER-WITH-OBJECT METHOD))|                  |(FAST-METHOD ADD-DIRECT-METHOD (SPECIALIZER-WITH-OBJECT METHOD))|
# Line 863  Line 870 
870                  |(FAST-METHOD REINITIALIZE-INSTANCE (STANDARD-METHOD))|                  |(FAST-METHOD REINITIALIZE-INSTANCE (STANDARD-METHOD))|
871                  |(FAST-METHOD INITIALIZE-INSTANCE :AFTER (STANDARD-GENERIC-FUNCTION))|                  |(FAST-METHOD INITIALIZE-INSTANCE :AFTER (STANDARD-GENERIC-FUNCTION))|
872                  |(FAST-METHOD REINITIALIZE-INSTANCE :AFTER (STANDARD-GENERIC-FUNCTION))|                  |(FAST-METHOD REINITIALIZE-INSTANCE :AFTER (STANDARD-GENERIC-FUNCTION))|
873                  |(FAST-METHOD GENERIC-FUNCTION-PRETTY-ARGLIST (STANDARD-GENERIC-FUNCTION))|                  |(FAST-METHOD CHANGE-CLASS (STANDARD-OBJECT FUNCALLABLE-STANDARD-CLASS))|
874                  |(FAST-METHOD INITIALIZE-INTERNAL-SLOT-FUNCTIONS (EFFECTIVE-SLOT-DEFINITION))|                  |(FAST-METHOD CHANGE-CLASS (STANDARD-OBJECT STANDARD-CLASS))|
                 |(FAST-METHOD SLOT-DEFINITION-ALLOCATION (STRUCTURE-SLOT-DEFINITION))|  
                 |(FAST-METHOD ENSURE-CLASS-USING-CLASS (T PCL-CLASS))|  
                 |(FAST-METHOD RAW-INSTANCE-ALLOCATOR (STANDARD-CLASS))|  
                 |(FAST-METHOD SLOTS-FETCHER (STANDARD-CLASS))|  
                 |(FAST-METHOD CLASS-DEFAULT-INITARGS (BUILT-IN-CLASS))|  
                 |(FAST-METHOD WRAPPER-FETCHER (STANDARD-CLASS))|  
                 |(FAST-METHOD CLASS-DIRECT-DEFAULT-INITARGS (BUILT-IN-CLASS))|  
                 |(FAST-METHOD CLASS-SLOTS (BUILT-IN-CLASS))|  
                 |(FAST-METHOD CLASS-DIRECT-SLOTS (BUILT-IN-CLASS))|  
                 |(FAST-METHOD MAKE-INSTANCES-OBSOLETE (STD-CLASS))|  
                 |(FAST-METHOD CLASS-PROTOTYPE (STD-CLASS))|  
                 |(FAST-METHOD CLASS-PROTOTYPE (STRUCTURE-CLASS))|  
875                  |(FAST-METHOD ALLOCATE-INSTANCE (STRUCTURE-CLASS))|                  |(FAST-METHOD ALLOCATE-INSTANCE (STRUCTURE-CLASS))|
876                  |(FAST-METHOD REINITIALIZE-INSTANCE :AFTER (SLOT-CLASS))|                  |(FAST-METHOD REINITIALIZE-INSTANCE :AFTER (SLOT-CLASS))|
877                  |(FAST-METHOD ALLOCATE-INSTANCE (STANDARD-CLASS))|                  |(FAST-METHOD CLASS-PROTOTYPE (STD-CLASS))|
878                  |(FAST-METHOD VALIDATE-SUPERCLASS (FUNCALLABLE-STANDARD-CLASS STANDARD-CLASS))|                  |(FAST-METHOD CLASS-PROTOTYPE (STRUCTURE-CLASS))|
879                  |(FAST-METHOD ALLOCATE-INSTANCE (FUNCALLABLE-STANDARD-CLASS))|                  |(FAST-METHOD ENSURE-CLASS-USING-CLASS (T PCL-CLASS))|
                 |(FAST-METHOD MAKE-INSTANCE (CLASS))|  
                 |(FAST-METHOD SAME-SPECIALIZER-P (CLASS CLASS))|  
                 |(FAST-METHOD ADD-DIRECT-SUBCLASS (CLASS CLASS))|  
                 |(FAST-METHOD REMOVE-DIRECT-SUBCLASS (CLASS CLASS))|  
                 |(FAST-METHOD REINITIALIZE-INSTANCE :BEFORE (SLOT-CLASS))|  
                 |(FAST-METHOD VALIDATE-SUPERCLASS (CLASS CLASS))|  
                 |(FAST-METHOD CHANGE-CLASS (STANDARD-OBJECT STANDARD-CLASS))|  
                 |(FAST-METHOD CHANGE-CLASS (STANDARD-OBJECT FUNCALLABLE-STANDARD-CLASS))|  
                 |(FAST-METHOD VALIDATE-SUPERCLASS (CLASS BUILT-IN-CLASS))|  
                 |(FAST-METHOD VALIDATE-SUPERCLASS (SLOT-CLASS FORWARD-REFERENCED-CLASS))|  
                 |(FAST-METHOD COMPUTE-CLASS-PRECEDENCE-LIST (SLOT-CLASS))|  
                 |(FAST-METHOD WRAPPER-FETCHER (FUNCALLABLE-STANDARD-CLASS))|  
                 |(FAST-METHOD SLOTS-FETCHER (FUNCALLABLE-STANDARD-CLASS))|  
                 |(FAST-METHOD RAW-INSTANCE-ALLOCATOR (FUNCALLABLE-STANDARD-CLASS))|  
880                  |(FAST-METHOD CLASS-CONSTRUCTORS (SLOT-CLASS))|                  |(FAST-METHOD CLASS-CONSTRUCTORS (SLOT-CLASS))|
881                  |(FAST-METHOD CLASS-SLOT-CELLS (STD-CLASS))|                  |(FAST-METHOD CLASS-SLOT-CELLS (STD-CLASS))|
882                  |(FAST-METHOD SPECIALIZER-CLASS (CLASS))|                  |(FAST-METHOD SPECIALIZER-CLASS (CLASS))|
# Line 911  Line 892 
892                  |(FAST-METHOD COMPUTE-SLOTS :AROUND (STRUCTURE-CLASS))|                  |(FAST-METHOD COMPUTE-SLOTS :AROUND (STRUCTURE-CLASS))|
893                  |(FAST-METHOD CLASS-DIRECT-DEFAULT-INITARGS (SLOT-CLASS))|                  |(FAST-METHOD CLASS-DIRECT-DEFAULT-INITARGS (SLOT-CLASS))|
894                  |(FAST-METHOD CLASS-DEFAULT-INITARGS (SLOT-CLASS))|                  |(FAST-METHOD CLASS-DEFAULT-INITARGS (SLOT-CLASS))|
895                    |(FAST-METHOD MAKE-INSTANCES-OBSOLETE (STD-CLASS))|
896                    |(FAST-METHOD CLASS-DIRECT-SLOTS (BUILT-IN-CLASS))|
897                    |(FAST-METHOD CLASS-SLOTS (BUILT-IN-CLASS))|
898                    |(FAST-METHOD CLASS-DIRECT-DEFAULT-INITARGS (BUILT-IN-CLASS))|
899                    |(FAST-METHOD WRAPPER-FETCHER (STANDARD-CLASS))|
900                    |(FAST-METHOD CLASS-DEFAULT-INITARGS (BUILT-IN-CLASS))|
901                    |(FAST-METHOD SLOTS-FETCHER (STANDARD-CLASS))|
902                    |(FAST-METHOD RAW-INSTANCE-ALLOCATOR (STANDARD-CLASS))|
903                    |(FAST-METHOD COMPUTE-CLASS-PRECEDENCE-LIST (SLOT-CLASS))|
904                    |(FAST-METHOD WRAPPER-FETCHER (FUNCALLABLE-STANDARD-CLASS))|
905                    |(FAST-METHOD SLOTS-FETCHER (FUNCALLABLE-STANDARD-CLASS))|
906                    |(FAST-METHOD RAW-INSTANCE-ALLOCATOR (FUNCALLABLE-STANDARD-CLASS))|
907                    |(FAST-METHOD ALLOCATE-INSTANCE (STANDARD-CLASS))|
908                    |(FAST-METHOD VALIDATE-SUPERCLASS (FUNCALLABLE-STANDARD-CLASS STANDARD-CLASS))|
909                    |(FAST-METHOD ALLOCATE-INSTANCE (FUNCALLABLE-STANDARD-CLASS))|
910                    |(FAST-METHOD MAKE-INSTANCE (CLASS))|
911                    |(FAST-METHOD ADD-DIRECT-SUBCLASS (CLASS CLASS))|
912                    |(FAST-METHOD SAME-SPECIALIZER-P (CLASS CLASS))|
913                    |(FAST-METHOD REMOVE-DIRECT-SUBCLASS (CLASS CLASS))|
914                    |(FAST-METHOD REINITIALIZE-INSTANCE :BEFORE (SLOT-CLASS))|
915                    |(FAST-METHOD VALIDATE-SUPERCLASS (CLASS CLASS))|
916                    |(FAST-METHOD VALIDATE-SUPERCLASS (CLASS BUILT-IN-CLASS))|
917                    |(FAST-METHOD VALIDATE-SUPERCLASS (SLOT-CLASS FORWARD-REFERENCED-CLASS))|
918                  CLASS-PREDICATE-NAME                  CLASS-PREDICATE-NAME
                 |PCL::STRUCTURE-OBJECT class predicate|  
                 |PCL::STRUCTURE-SLOT-DEFINITION class predicate|  
                 |PCL::STRUCTURE-DIRECT-SLOT-DEFINITION class predicate|  
919                  |PCL::STRUCTURE-EFFECTIVE-SLOT-DEFINITION class predicate|                  |PCL::STRUCTURE-EFFECTIVE-SLOT-DEFINITION class predicate|
920                    |PCL::STRUCTURE-DIRECT-SLOT-DEFINITION class predicate|
921                    |PCL::STRUCTURE-SLOT-DEFINITION class predicate|
922                    |PCL::STRUCTURE-OBJECT class predicate|
923                  |LISP::SYMBOL class predicate| CLASSP                  |LISP::SYMBOL class predicate| CLASSP
924                  |PCL::EFFECTIVE-SLOT-DEFINITION class predicate|                  |PCL::EFFECTIVE-SLOT-DEFINITION class predicate|
925                  |(COMBINED-METHOD SHARED-INITIALIZE)|                  |(COMBINED-METHOD SHARED-INITIALIZE)|
# Line 925  Line 929 
929                  |(READER READER-FUNCTION)| |(READER PREDICATE-NAME)|                  |(READER READER-FUNCTION)| |(READER PREDICATE-NAME)|
930                  |(READER READERS)| DESCRIBE-OBJECT                  |(READER READERS)| DESCRIBE-OBJECT
931                  |(READER CLASS-PRECEDENCE-LIST)|                  |(READER CLASS-PRECEDENCE-LIST)|
932                  |(READER ACCESSOR-FLAGS)| |(READER LOCATION)|                  |(READER ACCESSOR-FLAGS)| |(READER DOCUMENTATION)|
933                  |(READER DOCUMENTATION)| CLASS-INITIALIZE-INFO                  |(READER LOCATION)| CLASS-INITIALIZE-INFO
934                  |(SETF CLASS-SLOT-VALUE)| MAKE-WRITER-METHOD-FUNCTION                  |(SETF CLASS-SLOT-VALUE)| MAKE-WRITER-METHOD-FUNCTION
935                  |SETF PCL GF-DFUN-STATE|                  |SETF PCL GF-DFUN-STATE|
936                  |(READER INCOMPATIBLE-SUPERCLASS-LIST)|                  |(READER INCOMPATIBLE-SUPERCLASS-LIST)|
# Line 934  Line 938 
938                  |(READER IDENTITY-WITH-ONE-ARGUMENT)|                  |(READER IDENTITY-WITH-ONE-ARGUMENT)|
939                  |(SETF CLASS-INITIALIZE-INFO)|                  |(SETF CLASS-INITIALIZE-INFO)|
940                  |(READER PRETTY-ARGLIST)| |(READER DEFSTRUCT-FORM)|                  |(READER PRETTY-ARGLIST)| |(READER DEFSTRUCT-FORM)|
941                  |SETF PCL SLOT-DEFINITION-NAME| |SETF PCL CLASS-NAME|                  |SETF PCL CLASS-NAME| |SETF PCL SLOT-DEFINITION-NAME|
942                  |(WRITER READER-FUNCTION)|                  |(WRITER READER-FUNCTION)|
943                  |(SETF CLASS-DEFSTRUCT-CONSTRUCTOR)|                  |(SETF CLASS-DEFSTRUCT-CONSTRUCTOR)|
944                  |(WRITER PREDICATE-NAME)| |(WRITER READERS)|                  |(WRITER PREDICATE-NAME)| |(WRITER READERS)|
945                  |(READER WRITER-FUNCTION)| |(READER INITFUNCTION)|                  |(READER INITFUNCTION)| |(READER WRITER-FUNCTION)|
946                  INITIALIZE-INTERNAL-SLOT-FUNCTIONS                  INITIALIZE-INTERNAL-SLOT-FUNCTIONS
947                  |SETF PCL SLOT-DEFINITION-TYPE| |(READER WRITERS)|                  |SETF PCL SLOT-DEFINITION-TYPE|
948                  |(WRITER CLASS-PRECEDENCE-LIST)|                  |(WRITER CLASS-PRECEDENCE-LIST)| |(READER WRITERS)|
949                  |(WRITER ACCESSOR-FLAGS)| |(READER INITFORM)|                  |(WRITER ACCESSOR-FLAGS)| |(READER INITFORM)|
950                  METHOD-COMBINATION-P |(WRITER LOCATION)|                  METHOD-COMBINATION-P |(WRITER DOCUMENTATION)|
951                  |(WRITER DOCUMENTATION)|                  |(WRITER LOCATION)|
952                  |(CALL REAL-ENSURE-GF-USING-CLASS--GENERIC-FUNCTION)|                  |(CALL REAL-ENSURE-GF-USING-CLASS--GENERIC-FUNCTION)|
953                  |SETF PCL GENERIC-FUNCTION-METHODS|                  |SETF PCL METHOD-GENERIC-FUNCTION|
954                  |SETF PCL GENERIC-FUNCTION-METHOD-COMBINATION|                  |SETF PCL GENERIC-FUNCTION-METHOD-COMBINATION|
955                  |SETF PCL METHOD-GENERIC-FUNCTION| |(READER SLOT-NAME)|                  |SETF PCL GENERIC-FUNCTION-METHODS|
956                    |(READER SLOT-NAME)|
957                  |(WRITER INCOMPATIBLE-SUPERCLASS-LIST)|                  |(WRITER INCOMPATIBLE-SUPERCLASS-LIST)|
958                  |SETF PCL SLOT-ACCESSOR-STD-P|                  |SETF PCL SLOT-ACCESSOR-STD-P|
959                  |(CALL REAL-MAKE-METHOD-INITARGS-FORM)|                  |(CALL REAL-MAKE-METHOD-INITARGS-FORM)|
960                  |(READER ALLOCATION)| |(WRITER SPECIALIZERS)|                  |(READER ALLOCATION)| |(WRITER SPECIALIZERS)|
961                  |(CALL REAL-ENSURE-GF-USING-CLASS--NULL)|                  |(CALL REAL-ENSURE-GF-USING-CLASS--NULL)|
962                  |(WRITER IDENTITY-WITH-ONE-ARGUMENT)|                  |(WRITER IDENTITY-WITH-ONE-ARGUMENT)|
963                  |(SETF METHOD-GENERIC-FUNCTION)|                  |(SETF METHOD-GENERIC-FUNCTION)| LEGAL-SPECIALIZERS-P
964                  |(WRITER PRETTY-ARGLIST)| LEGAL-SPECIALIZERS-P                  |(WRITER PRETTY-ARGLIST)| |SETF PCL OBJECT-PLIST|
965                  |SETF PCL OBJECT-PLIST| |LISP::FLOAT class predicate|                  |LISP::FLOAT class predicate| |(WRITER DEFSTRUCT-FORM)|
966                  |(WRITER DEFSTRUCT-FORM)| |(READER FUNCTION)|                  |(READER GENERIC-FUNCTION)| |(READER FUNCTION)|
967                  |(READER GENERIC-FUNCTION)| |(READER LAMBDA-LIST)|                  |(READER LAMBDA-LIST)| |(READER SLOT-DEFINITION)|
                 |(READER SLOT-DEFINITION)|  
968                  |PCL::CLASS-PROTOTYPE-SPECIALIZER class predicate|                  |PCL::CLASS-PROTOTYPE-SPECIALIZER class predicate|
                 |SETF PCL SLOT-DEFINITION-INITFORM|  
969                  |SETF PCL CLASS-DEFSTRUCT-FORM|                  |SETF PCL CLASS-DEFSTRUCT-FORM|
970                    |SETF PCL SLOT-DEFINITION-INITFORM|
971                  |(READER CAN-PRECEDE-LIST)|                  |(READER CAN-PRECEDE-LIST)|
972                  |SETF PCL GENERIC-FUNCTION-METHOD-CLASS|                  |SETF PCL GENERIC-FUNCTION-METHOD-CLASS|
973                  |(READER PROTOTYPE)| |(WRITER WRITER-FUNCTION)|                  |(READER PROTOTYPE)| |(WRITER INITFUNCTION)|
974                  |(WRITER INITFUNCTION)| |(WRITER WRITERS)|                  |(WRITER WRITER-FUNCTION)| |(WRITER WRITERS)|
975                  SLOT-ACCESSOR-STD-P |(WRITER INITFORM)|                  SLOT-ACCESSOR-STD-P |(WRITER INITFORM)|
976                  |(READER DFUN-STATE)| |(READER FROM-DEFCLASS-P)|                  |(READER DFUN-STATE)| |(READER FROM-DEFCLASS-P)|
977                  |SETF PCL GF-PRETTY-ARGLIST|                  |SETF PCL GF-PRETTY-ARGLIST|
                 |SETF PCL SLOT-ACCESSOR-FUNCTION|  
                 |SETF PCL SLOT-DEFINITION-LOCATION|  
                 |SETF PCL SLOT-DEFINITION-READER-FUNCTION|  
                 |SETF PCL SLOT-DEFINITION-WRITER-FUNCTION|  
                 |SETF PCL SLOT-DEFINITION-BOUNDP-FUNCTION|  
                 |SETF PCL SLOT-DEFINITION-INTERNAL-READER-FUNCTION|  
                 |SETF PCL SLOT-DEFINITION-INTERNAL-WRITER-FUNCTION|  
                 |SETF PCL SLOT-DEFINITION-ALLOCATION|  
978                  |SETF PCL SLOT-DEFINITION-INITFUNCTION|                  |SETF PCL SLOT-DEFINITION-INITFUNCTION|
979                  |(WRITER SLOT-NAME)| |(BOUNDP NAME)|                  |SETF PCL SLOT-DEFINITION-ALLOCATION|
980                  |(READER FAST-FUNCTION)| |(WRITER ALLOCATION)|                  |SETF PCL SLOT-DEFINITION-INTERNAL-WRITER-FUNCTION|
981                  |(READER METHOD-CLASS)| |(SETF OBJECT-PLIST)|                  |SETF PCL SLOT-DEFINITION-INTERNAL-READER-FUNCTION|
982                  |(READER INTERNAL-WRITER-FUNCTION)|                  |SETF PCL SLOT-DEFINITION-BOUNDP-FUNCTION|
983                    |SETF PCL SLOT-DEFINITION-WRITER-FUNCTION|
984                    |SETF PCL SLOT-DEFINITION-READER-FUNCTION|
985                    |SETF PCL SLOT-DEFINITION-LOCATION|
986                    |SETF PCL SLOT-ACCESSOR-FUNCTION| |(WRITER SLOT-NAME)|
987                    |(BOUNDP NAME)| |(WRITER ALLOCATION)|
988                    |(READER FAST-FUNCTION)| |(READER METHOD-CLASS)|
989                    |(SETF OBJECT-PLIST)| |(READER METHOD-COMBINATION)|
990                  |(READER INTERNAL-READER-FUNCTION)|                  |(READER INTERNAL-READER-FUNCTION)|
991                  |(READER METHOD-COMBINATION)|                  |(READER INTERNAL-WRITER-FUNCTION)|
992                  METHOD-COMBINATION-OPTIONS |(READER DIRECT-SLOTS)|                  METHOD-COMBINATION-OPTIONS |(READER DIRECT-METHODS)|
993                  |(READER DIRECT-METHODS)|                  |(READER DIRECT-SLOTS)|
994                  |SETF PCL SLOT-DEFINITION-READERS| |(WRITER FUNCTION)|                  |SETF PCL SLOT-DEFINITION-READERS|
995                  |(WRITER GENERIC-FUNCTION)| |(READER BOUNDP-FUNCTION)|                  |(READER BOUNDP-FUNCTION)| |(WRITER GENERIC-FUNCTION)|
996                  |SETF PCL DOCUMENTATION| |(READER DIRECT-SUBCLASSES)|                  |(WRITER FUNCTION)| |(READER DIRECT-SUPERCLASSES)|
997                  |(READER DIRECT-SUPERCLASSES)| |(WRITER LAMBDA-LIST)|                  |(READER DIRECT-SUBCLASSES)| |SETF PCL DOCUMENTATION|
998                  |LISP::LIST class predicate|                  |(WRITER LAMBDA-LIST)| |LISP::LIST class predicate|
999                  FUNCALLABLE-STANDARD-CLASS-P                  FUNCALLABLE-STANDARD-CLASS-P |(BOUNDP CLASS)|
1000                  |(FAST-WRITER-METHOD SLOT-OBJECT METHOD)|                  |(FAST-WRITER-METHOD SLOT-OBJECT METHOD)|
1001                  |(BOUNDP CLASS)| |(WRITER SLOT-DEFINITION)|                  |(WRITER SLOT-DEFINITION)| |(READER OPTIONS)|
1002                  |(READER METHODS)| |(READER OPTIONS)|                  |(READER METHODS)| |(WRITER CAN-PRECEDE-LIST)|
                 |(WRITER CAN-PRECEDE-LIST)|  
                 |SETF PCL SLOT-DEFINITION-CLASS|  
1003                  |SETF PCL SLOT-VALUE-USING-CLASS|                  |SETF PCL SLOT-VALUE-USING-CLASS|
1004                  |(FAST-WRITER-METHOD SLOT-OBJECT DEFSTRUCT-ACCESSOR-SYMBOL)|                  |SETF PCL SLOT-DEFINITION-CLASS|
1005                  |(FAST-WRITER-METHOD STRUCTURE-SLOT-DEFINITION DEFSTRUCT-ACCESSOR-SYMBOL)|                  |(FAST-WRITER-METHOD STRUCTURE-SLOT-DEFINITION DEFSTRUCT-ACCESSOR-SYMBOL)|
1006                  |(WRITER PROTOTYPE)| |(BOUNDP TYPE)| |(BOUNDP OBJECT)|                  |(FAST-WRITER-METHOD SLOT-OBJECT DEFSTRUCT-ACCESSOR-SYMBOL)|
1007                  CLASS-CAN-PRECEDE-LIST |SETF PCL CLASS-DIRECT-SLOTS|                  |(WRITER PROTOTYPE)| |(BOUNDP OBJECT)| |(BOUNDP TYPE)|
1008                  |SETF PCL CLASS-SLOTS| SLOT-ACCESSOR-FUNCTION                  CLASS-CAN-PRECEDE-LIST |SETF PCL CLASS-SLOTS|
1009                    |SETF PCL CLASS-DIRECT-SLOTS| SLOT-ACCESSOR-FUNCTION
1010                  |(BOUNDP PLIST)|                  |(BOUNDP PLIST)|
1011                  |SETF PCL CLASS-INCOMPATIBLE-SUPERCLASS-LIST|                  |SETF PCL CLASS-INCOMPATIBLE-SUPERCLASS-LIST|
1012                  |SETF PCL SLOT-DEFINITION-WRITERS|                  |SETF PCL SLOT-DEFINITION-WRITERS|
# Line 1012  Line 1014 
1014                  |(WRITER DFUN-STATE)| |(WRITER FROM-DEFCLASS-P)|                  |(WRITER DFUN-STATE)| |(WRITER FROM-DEFCLASS-P)|
1015                  |(BOUNDP SLOTS)| SLOT-CLASS-P                  |(BOUNDP SLOTS)| SLOT-CLASS-P
1016                  MAKE-READER-METHOD-FUNCTION LEGAL-METHOD-FUNCTION-P                  MAKE-READER-METHOD-FUNCTION LEGAL-METHOD-FUNCTION-P
                 |(FAST-WRITER-METHOD SLOT-OBJECT INITIALIZE-INFO)|  
                 |(FAST-WRITER-METHOD SLOT-CLASS INITIALIZE-INFO)|  
1017                  |(FAST-WRITER-METHOD SLOT-OBJECT ARG-INFO)|                  |(FAST-WRITER-METHOD SLOT-OBJECT ARG-INFO)|
1018                    |(FAST-WRITER-METHOD SLOT-CLASS INITIALIZE-INFO)|
1019                    |(FAST-WRITER-METHOD SLOT-OBJECT INITIALIZE-INFO)|
1020                  |PCL::PLIST-MIXIN class predicate|                  |PCL::PLIST-MIXIN class predicate|
1021                  |(WRITER FAST-FUNCTION)| |(WRITER METHOD-CLASS)|                  |(WRITER FAST-FUNCTION)| |(WRITER METHOD-CLASS)|
1022                  |(FAST-WRITER-METHOD SLOT-OBJECT WRAPPER)| GET-METHOD                  |(FAST-WRITER-METHOD SLOT-OBJECT WRAPPER)|
1023                  |(WRITER INTERNAL-WRITER-FUNCTION)|                  |(WRITER METHOD-COMBINATION)|
1024                  |(WRITER INTERNAL-READER-FUNCTION)|                  |(WRITER INTERNAL-READER-FUNCTION)|
1025                  |(WRITER METHOD-COMBINATION)| |(WRITER DIRECT-SLOTS)|                  |(WRITER INTERNAL-WRITER-FUNCTION)| GET-METHOD
1026                  |(WRITER DIRECT-METHODS)|                  |(WRITER DIRECT-METHODS)| |(WRITER DIRECT-SLOTS)|
                 |(FAST-WRITER-METHOD SLOT-OBJECT INITARGS)|  
1027                  |(FAST-WRITER-METHOD SLOT-DEFINITION INITARGS)|                  |(FAST-WRITER-METHOD SLOT-DEFINITION INITARGS)|
1028                  |(FAST-WRITER-METHOD SLOT-OBJECT OPERATOR)|                  |(FAST-WRITER-METHOD SLOT-OBJECT INITARGS)|
                 |(FAST-WRITER-METHOD SLOT-OBJECT DEFSTRUCT-CONSTRUCTOR)|  
1029                  |(FAST-WRITER-METHOD STRUCTURE-CLASS DEFSTRUCT-CONSTRUCTOR)|                  |(FAST-WRITER-METHOD STRUCTURE-CLASS DEFSTRUCT-CONSTRUCTOR)|
1030                  |(WRITER BOUNDP-FUNCTION)| |(WRITER DIRECT-SUBCLASSES)|                  |(FAST-WRITER-METHOD SLOT-OBJECT DEFSTRUCT-CONSTRUCTOR)|
1031                    |(FAST-WRITER-METHOD SLOT-OBJECT OPERATOR)|
1032                    |(WRITER BOUNDP-FUNCTION)|
1033                  |(WRITER DIRECT-SUPERCLASSES)|                  |(WRITER DIRECT-SUPERCLASSES)|
1034                    |(WRITER DIRECT-SUBCLASSES)|
1035                  |(FAST-WRITER-METHOD SLOT-OBJECT CLASS-EQ-SPECIALIZER)|                  |(FAST-WRITER-METHOD SLOT-OBJECT CLASS-EQ-SPECIALIZER)|
1036                  |(WRITER METHODS)| |(WRITER OPTIONS)|                  |(WRITER OPTIONS)| |(WRITER METHODS)|
1037                  SHORT-METHOD-COMBINATION-P GF-ARG-INFO                  SHORT-METHOD-COMBINATION-P GF-ARG-INFO
1038                  SPECIALIZER-METHOD-TABLE MAKE-METHOD-INITARGS-FORM                  SPECIALIZER-METHOD-TABLE MAKE-METHOD-INITARGS-FORM
1039                  CLASS-DEFSTRUCT-FORM |LISP::INTEGER class predicate|                  CLASS-DEFSTRUCT-FORM
                 |(FAST-READER-METHOD SLOT-OBJECT PREDICATE-NAME)|  
                 |(FAST-READER-METHOD CLASS PREDICATE-NAME)|  
                 |(FAST-READER-METHOD CLASS NAME)|  
                 |(FAST-READER-METHOD SLOT-DEFINITION NAME)|  
                 |(FAST-READER-METHOD SLOT-OBJECT SLOT-NAME)|  
                 |(FAST-READER-METHOD STANDARD-ACCESSOR-METHOD SLOT-NAME)|  
                 |(FAST-READER-METHOD SLOT-OBJECT DFUN-STATE)|  
                 |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION DFUN-STATE)|  
                 |(FAST-READER-METHOD SLOT-OBJECT NAME)|  
1040                  |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION NAME)|                  |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION NAME)|
1041                  GF-PRETTY-ARGLIST SAME-SPECIALIZER-P                  |(FAST-READER-METHOD SLOT-OBJECT NAME)|
1042                  SLOT-DEFINITION-BOUNDP-FUNCTION                  |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION DFUN-STATE)|
1043                  SLOT-DEFINITION-WRITER-FUNCTION                  |(FAST-READER-METHOD SLOT-OBJECT DFUN-STATE)|
1044                  SLOT-DEFINITION-READER-FUNCTION                  |(FAST-READER-METHOD STANDARD-ACCESSOR-METHOD SLOT-NAME)|
1045                  SLOT-DEFINITION-INTERNAL-WRITER-FUNCTION                  |(FAST-READER-METHOD SLOT-OBJECT SLOT-NAME)|
1046                    |(FAST-READER-METHOD SLOT-DEFINITION NAME)|
1047                    |(FAST-READER-METHOD CLASS NAME)|
1048                    |(FAST-READER-METHOD CLASS PREDICATE-NAME)|
1049                    |(FAST-READER-METHOD SLOT-OBJECT PREDICATE-NAME)|
1050                    |LISP::INTEGER class predicate| GF-PRETTY-ARGLIST
1051                    SAME-SPECIALIZER-P
1052                  SLOT-DEFINITION-INTERNAL-READER-FUNCTION                  SLOT-DEFINITION-INTERNAL-READER-FUNCTION
1053                  |(FAST-READER-METHOD SLOT-OBJECT CLASS)|                  SLOT-DEFINITION-INTERNAL-WRITER-FUNCTION
1054                  |(FAST-READER-METHOD SLOT-DEFINITION CLASS)|                  SLOT-DEFINITION-READER-FUNCTION
1055                  |(FAST-READER-METHOD SLOT-OBJECT ACCESSOR-FLAGS)|                  SLOT-DEFINITION-WRITER-FUNCTION
1056                  |(FAST-READER-METHOD SLOT-OBJECT METHOD-CLASS)|                  SLOT-DEFINITION-BOUNDP-FUNCTION
1057                  |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION METHOD-CLASS)|                  |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION METHOD-CLASS)|
1058                  |(FAST-READER-METHOD TRACED-METHOD GENERIC-FUNCTION)|                  |(FAST-READER-METHOD SLOT-OBJECT METHOD-CLASS)|
1059                  |(FAST-READER-METHOD TRACED-METHOD FUNCTION)|                  |(FAST-READER-METHOD SLOT-OBJECT ACCESSOR-FLAGS)|
1060                  |(FAST-READER-METHOD LONG-METHOD-COMBINATION FUNCTION)|                  |(FAST-READER-METHOD SLOT-DEFINITION CLASS)|
1061                  |(FAST-READER-METHOD SLOT-OBJECT INITFUNCTION)|                  |(FAST-READER-METHOD SLOT-OBJECT CLASS)|
                 |(FAST-READER-METHOD SLOT-DEFINITION INITFUNCTION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT ALLOCATION)|  
                 |(FAST-READER-METHOD STANDARD-SLOT-DEFINITION ALLOCATION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT INTERNAL-WRITER-FUNCTION)|  
                 |(FAST-READER-METHOD STRUCTURE-SLOT-DEFINITION INTERNAL-WRITER-FUNCTION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT INTERNAL-READER-FUNCTION)|  
                 |(FAST-READER-METHOD STRUCTURE-SLOT-DEFINITION INTERNAL-READER-FUNCTION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT BOUNDP-FUNCTION)|  
                 |(FAST-READER-METHOD EFFECTIVE-SLOT-DEFINITION BOUNDP-FUNCTION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT WRITER-FUNCTION)|  
                 |(FAST-READER-METHOD EFFECTIVE-SLOT-DEFINITION WRITER-FUNCTION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT READER-FUNCTION)|  
                 |(FAST-READER-METHOD EFFECTIVE-SLOT-DEFINITION READER-FUNCTION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT LOCATION)|  
                 |(FAST-READER-METHOD STANDARD-EFFECTIVE-SLOT-DEFINITION LOCATION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT FAST-FUNCTION)|  
                 |(FAST-READER-METHOD STANDARD-METHOD FAST-FUNCTION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT FUNCTION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT GENERIC-FUNCTION)|  
                 |(FAST-READER-METHOD STANDARD-METHOD GENERIC-FUNCTION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT SLOT-DEFINITION)|  
                 |(FAST-READER-METHOD STANDARD-ACCESSOR-METHOD SLOT-DEFINITION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT METHOD-COMBINATION)|  
                 |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION METHOD-COMBINATION)|  
                 |(FAST-READER-METHOD SLOT-OBJECT DOCUMENTATION)|  
1062                  |(FAST-READER-METHOD STANDARD-METHOD-COMBINATION DOCUMENTATION)|                  |(FAST-READER-METHOD STANDARD-METHOD-COMBINATION DOCUMENTATION)|
1063                  |(FAST-READER-METHOD SLOT-OBJECT WRITERS)|                  |(FAST-READER-METHOD SLOT-OBJECT DOCUMENTATION)|
1064                  |(FAST-READER-METHOD SLOT-DEFINITION WRITERS)|                  |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION METHOD-COMBINATION)|
1065                  |(FAST-READER-METHOD SLOT-OBJECT READERS)|                  |(FAST-READER-METHOD SLOT-OBJECT METHOD-COMBINATION)|
1066                  |(FAST-READER-METHOD SLOT-DEFINITION READERS)|                  |(FAST-READER-METHOD STANDARD-ACCESSOR-METHOD SLOT-DEFINITION)|
1067                  |(FAST-READER-METHOD SLOT-OBJECT SPECIALIZERS)|                  |(FAST-READER-METHOD SLOT-OBJECT SLOT-DEFINITION)|
1068                    |(FAST-READER-METHOD STANDARD-METHOD GENERIC-FUNCTION)|
1069                    |(FAST-READER-METHOD SLOT-OBJECT GENERIC-FUNCTION)|
1070                    |(FAST-READER-METHOD SLOT-OBJECT FUNCTION)|
1071                    |(FAST-READER-METHOD STANDARD-METHOD FAST-FUNCTION)|
1072                    |(FAST-READER-METHOD SLOT-OBJECT FAST-FUNCTION)|
1073                    |(FAST-READER-METHOD STANDARD-EFFECTIVE-SLOT-DEFINITION LOCATION)|
1074                    |(FAST-READER-METHOD SLOT-OBJECT LOCATION)|
1075                    |(FAST-READER-METHOD EFFECTIVE-SLOT-DEFINITION READER-FUNCTION)|
1076                    |(FAST-READER-METHOD SLOT-OBJECT READER-FUNCTION)|
1077                    |(FAST-READER-METHOD EFFECTIVE-SLOT-DEFINITION WRITER-FUNCTION)|
1078                    |(FAST-READER-METHOD SLOT-OBJECT WRITER-FUNCTION)|
1079                    |(FAST-READER-METHOD EFFECTIVE-SLOT-DEFINITION BOUNDP-FUNCTION)|
1080                    |(FAST-READER-METHOD SLOT-OBJECT BOUNDP-FUNCTION)|
1081                    |(FAST-READER-METHOD STRUCTURE-SLOT-DEFINITION INTERNAL-READER-FUNCTION)|
1082                    |(FAST-READER-METHOD SLOT-OBJECT INTERNAL-READER-FUNCTION)|
1083                    |(FAST-READER-METHOD STRUCTURE-SLOT-DEFINITION INTERNAL-WRITER-FUNCTION)|
1084                    |(FAST-READER-METHOD SLOT-OBJECT INTERNAL-WRITER-FUNCTION)|
1085                    |(FAST-READER-METHOD STANDARD-SLOT-DEFINITION ALLOCATION)|
1086                    |(FAST-READER-METHOD SLOT-OBJECT ALLOCATION)|
1087                    |(FAST-READER-METHOD SLOT-DEFINITION INITFUNCTION)|
1088                    |(FAST-READER-METHOD SLOT-OBJECT INITFUNCTION)|
1089                    |(FAST-READER-METHOD LONG-METHOD-COMBINATION FUNCTION)|
1090                    |(FAST-READER-METHOD TRACED-METHOD FUNCTION)|
1091                    |(FAST-READER-METHOD TRACED-METHOD GENERIC-FUNCTION)|
1092                  |(FAST-READER-METHOD STANDARD-METHOD SPECIALIZERS)|                  |(FAST-READER-METHOD STANDARD-METHOD SPECIALIZERS)|
1093                  |(FAST-READER-METHOD SPECIALIZER TYPE)|                  |(FAST-READER-METHOD SLOT-OBJECT SPECIALIZERS)|
1094                  |(FAST-READER-METHOD SLOT-OBJECT PROTOTYPE)|                  |(FAST-READER-METHOD SLOT-DEFINITION READERS)|
1095                  |(FAST-READER-METHOD PCL-CLASS PROTOTYPE)|                  |(FAST-READER-METHOD SLOT-OBJECT READERS)|
1096                  |(FAST-READER-METHOD SLOT-DEFINITION TYPE)|                  |(FAST-READER-METHOD SLOT-DEFINITION WRITERS)|
1097                  |(FAST-READER-METHOD SLOT-OBJECT TYPE)|                  |(FAST-READER-METHOD SLOT-OBJECT WRITERS)|
                 |(FAST-READER-METHOD STANDARD-METHOD-COMBINATION TYPE)|  
                 |(FAST-READER-METHOD SHORT-METHOD-COMBINATION IDENTITY-WITH-ONE-ARGUMENT)|  
                 |(FAST-READER-METHOD SLOT-OBJECT IDENTITY-WITH-ONE-ARGUMENT)|  
                 |(FAST-READER-METHOD CLASS-EQ-SPECIALIZER OBJECT)|  
                 |(FAST-READER-METHOD CLASS-PROTOTYPE-SPECIALIZER OBJECT)|  
                 |(FAST-READER-METHOD SLOT-OBJECT OBJECT)|  
1098                  |(FAST-READER-METHOD EQL-SPECIALIZER OBJECT)|                  |(FAST-READER-METHOD EQL-SPECIALIZER OBJECT)|
1099                  |(FAST-READER-METHOD SLOT-OBJECT DEFSTRUCT-FORM)|                  |(FAST-READER-METHOD SLOT-OBJECT OBJECT)|
1100                  |(FAST-READER-METHOD STRUCTURE-CLASS DEFSTRUCT-FORM)|                  |(FAST-READER-METHOD CLASS-PROTOTYPE-SPECIALIZER OBJECT)|
1101                  |(FAST-READER-METHOD SLOT-OBJECT INITFORM)|                  |(FAST-READER-METHOD CLASS-EQ-SPECIALIZER OBJECT)|
1102                    |(FAST-READER-METHOD SLOT-OBJECT IDENTITY-WITH-ONE-ARGUMENT)|
1103                    |(FAST-READER-METHOD SHORT-METHOD-COMBINATION IDENTITY-WITH-ONE-ARGUMENT)|
1104                    |(FAST-READER-METHOD STANDARD-METHOD-COMBINATION TYPE)|
1105                    |(FAST-READER-METHOD SLOT-OBJECT TYPE)|
1106                    |(FAST-READER-METHOD SLOT-DEFINITION TYPE)|
1107                    |(FAST-READER-METHOD PCL-CLASS PROTOTYPE)|
1108                    |(FAST-READER-METHOD SLOT-OBJECT PROTOTYPE)|
1109                    |(FAST-READER-METHOD SPECIALIZER TYPE)|
1110                  |(FAST-READER-METHOD SLOT-DEFINITION INITFORM)|                  |(FAST-READER-METHOD SLOT-DEFINITION INITFORM)|
1111                  |(FAST-READER-METHOD SLOT-OBJECT PLIST)|                  |(FAST-READER-METHOD SLOT-OBJECT INITFORM)|
1112                  |(FAST-READER-METHOD PLIST-MIXIN PLIST)|                  |(FAST-READER-METHOD STRUCTURE-CLASS DEFSTRUCT-FORM)|
1113                  |(FAST-READER-METHOD SLOT-OBJECT INCOMPATIBLE-SUPERCLASS-LIST)|                  |(FAST-READER-METHOD SLOT-OBJECT DEFSTRUCT-FORM)|
                 |(FAST-READER-METHOD PCL-CLASS INCOMPATIBLE-SUPERCLASS-LIST)|  
                 |(FAST-READER-METHOD SLOT-OBJECT CAN-PRECEDE-LIST)|  
                 |(FAST-READER-METHOD PCL-CLASS CAN-PRECEDE-LIST)|  
                 |(FAST-READER-METHOD SLOT-OBJECT CLASS-PRECEDENCE-LIST)|  
                 |(FAST-READER-METHOD PCL-CLASS CLASS-PRECEDENCE-LIST)|  
                 |(FAST-READER-METHOD SLOT-OBJECT LAMBDA-LIST)|  
                 |(FAST-READER-METHOD STANDARD-METHOD LAMBDA-LIST)|  
                 |(FAST-READER-METHOD SLOT-OBJECT PRETTY-ARGLIST)|  
1114                  |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION PRETTY-ARGLIST)|                  |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION PRETTY-ARGLIST)|
1115                  |(FAST-READER-METHOD SLOT-OBJECT DIRECT-METHODS)|                  |(FAST-READER-METHOD SLOT-OBJECT PRETTY-ARGLIST)|
1116                  |(FAST-READER-METHOD SLOT-OBJECT SLOTS)|                  |(FAST-READER-METHOD STANDARD-METHOD LAMBDA-LIST)|
1117                  |(FAST-READER-METHOD SLOT-CLASS SLOTS)|                  |(FAST-READER-METHOD SLOT-OBJECT LAMBDA-LIST)|
1118                  |(FAST-READER-METHOD SLOT-OBJECT DIRECT-SLOTS)|                  |(FAST-READER-METHOD PCL-CLASS CLASS-PRECEDENCE-LIST)|
1119                  |(FAST-READER-METHOD SLOT-CLASS DIRECT-SLOTS)|                  |(FAST-READER-METHOD SLOT-OBJECT CLASS-PRECEDENCE-LIST)|
1120                  |(FAST-READER-METHOD SLOT-OBJECT METHODS)|                  |(FAST-READER-METHOD PCL-CLASS CAN-PRECEDE-LIST)|
1121                  |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION METHODS)|                  |(FAST-READER-METHOD SLOT-OBJECT CAN-PRECEDE-LIST)|
1122                  |(FAST-READER-METHOD SLOT-OBJECT OPTIONS)|                  |(FAST-READER-METHOD PCL-CLASS INCOMPATIBLE-SUPERCLASS-LIST)|
1123                  |(FAST-READER-METHOD STANDARD-METHOD-COMBINATION OPTIONS)|                  |(FAST-READER-METHOD SLOT-OBJECT INCOMPATIBLE-SUPERCLASS-LIST)|
1124                    |(FAST-READER-METHOD PLIST-MIXIN PLIST)|
1125                    |(FAST-READER-METHOD SLOT-OBJECT PLIST)|
1126                  |(FAST-READER-METHOD SLOT-OBJECT FROM-DEFCLASS-P)|                  |(FAST-READER-METHOD SLOT-OBJECT FROM-DEFCLASS-P)|
1127                  |(FAST-READER-METHOD SLOT-OBJECT DIRECT-SUBCLASSES)|                  |(FAST-READER-METHOD STANDARD-METHOD-COMBINATION OPTIONS)|
1128                  |(FAST-READER-METHOD CLASS DIRECT-SUBCLASSES)|                  |(FAST-READER-METHOD SLOT-OBJECT OPTIONS)|
1129                  |(FAST-READER-METHOD SLOT-OBJECT DIRECT-SUPERCLASSES)|                  |(FAST-READER-METHOD STANDARD-GENERIC-FUNCTION METHODS)|
1130                    |(FAST-READER-METHOD SLOT-OBJECT METHODS)|
1131                    |(FAST-READER-METHOD SLOT-CLASS DIRECT-SLOTS)|
1132                    |(FAST-READER-METHOD SLOT-OBJECT DIRECT-SLOTS)|
1133                    |(FAST-READER-METHOD SLOT-CLASS SLOTS)|
1134                    |(FAST-READER-METHOD SLOT-OBJECT SLOTS)|
1135                    |(FAST-READER-METHOD SLOT-OBJECT DIRECT-METHODS)|
1136                  |(FAST-READER-METHOD CLASS DIRECT-SUPERCLASSES)|                  |(FAST-READER-METHOD CLASS DIRECT-SUPERCLASSES)|
1137                    |(FAST-READER-METHOD SLOT-OBJECT DIRECT-SUPERCLASSES)|
1138                    |(FAST-READER-METHOD CLASS DIRECT-SUBCLASSES)|
1139                    |(FAST-READER-METHOD SLOT-OBJECT DIRECT-SUBCLASSES)|
1140                  SLOT-DEFINITION-CLASS EQL-SPECIALIZER-OBJECT                  SLOT-DEFINITION-CLASS EQL-SPECIALIZER-OBJECT
1141                  |PCL::DIRECT-SLOT-DEFINITION class predicate|                  |PCL::DIRECT-SLOT-DEFINITION class predicate|
1142                  CLASS-CONSTRUCTORS |(BOUNDP WRAPPER)| SLOTS-TO-INSPECT                  CLASS-CONSTRUCTORS |(BOUNDP WRAPPER)| SLOTS-TO-INSPECT
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT PREDICATE-NAME)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT SLOT-NAME)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT DFUN-STATE)|  
1143                  |(FAST-BOUNDP-METHOD SLOT-OBJECT NAME)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT NAME)|
1144                    |(FAST-BOUNDP-METHOD SLOT-OBJECT DFUN-STATE)|
1145                    |(FAST-BOUNDP-METHOD SLOT-OBJECT SLOT-NAME)|
1146                    |(FAST-BOUNDP-METHOD SLOT-OBJECT PREDICATE-NAME)|
1147                  |(BOUNDP DEFSTRUCT-ACCESSOR-SYMBOL)|                  |(BOUNDP DEFSTRUCT-ACCESSOR-SYMBOL)|
1148                  SPECIALIZER-DIRECT-GENERIC-FUNCTIONS                  SPECIALIZER-DIRECT-GENERIC-FUNCTIONS
1149                  |(BOUNDP CLASS-EQ-SPECIALIZER)|                  |(BOUNDP CLASS-EQ-SPECIALIZER)|
1150                  |(SETF SLOT-DEFINITION-NAME)| ADD-WRITER-METHOD                  |(SETF SLOT-DEFINITION-NAME)| ADD-WRITER-METHOD
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT CLASS)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT ACCESSOR-FLAGS)|  
1151                  |(FAST-BOUNDP-METHOD SLOT-OBJECT METHOD-CLASS)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT METHOD-CLASS)|
1152                  |(FAST-BOUNDP-METHOD SLOT-OBJECT INITFUNCTION)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT ACCESSOR-FLAGS)|
1153                  |(FAST-BOUNDP-METHOD SLOT-OBJECT ALLOCATION)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT CLASS)|
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT INTERNAL-WRITER-FUNCTION)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT INTERNAL-READER-FUNCTION)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT BOUNDP-FUNCTION)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT WRITER-FUNCTION)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT READER-FUNCTION)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT LOCATION)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT FAST-FUNCTION)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT FUNCTION)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT GENERIC-FUNCTION)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT SLOT-DEFINITION)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT METHOD-COMBINATION)|  
1154                  |(FAST-BOUNDP-METHOD SLOT-OBJECT DOCUMENTATION)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT DOCUMENTATION)|
1155                    |(FAST-BOUNDP-METHOD SLOT-OBJECT METHOD-COMBINATION)|
1156                    |(FAST-BOUNDP-METHOD SLOT-OBJECT SLOT-DEFINITION)|
1157                    |(FAST-BOUNDP-METHOD SLOT-OBJECT GENERIC-FUNCTION)|
1158                    |(FAST-BOUNDP-METHOD SLOT-OBJECT FUNCTION)|
1159                    |(FAST-BOUNDP-METHOD SLOT-OBJECT FAST-FUNCTION)|
1160                    |(FAST-BOUNDP-METHOD SLOT-OBJECT LOCATION)|
1161                    |(FAST-BOUNDP-METHOD SLOT-OBJECT READER-FUNCTION)|
1162                    |(FAST-BOUNDP-METHOD SLOT-OBJECT WRITER-FUNCTION)|
1163                    |(FAST-BOUNDP-METHOD SLOT-OBJECT BOUNDP-FUNCTION)|
1164                    |(FAST-BOUNDP-METHOD SLOT-OBJECT INTERNAL-READER-FUNCTION)|
1165                    |(FAST-BOUNDP-METHOD SLOT-OBJECT INTERNAL-WRITER-FUNCTION)|
1166                    |(FAST-BOUNDP-METHOD SLOT-OBJECT ALLOCATION)|
1167                    |(FAST-BOUNDP-METHOD SLOT-OBJECT INITFUNCTION)|
1168                  |(BOUNDP OPERATOR)| |(BOUNDP ARG-INFO)|                  |(BOUNDP OPERATOR)| |(BOUNDP ARG-INFO)|
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT WRITERS)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT READERS)|  
1169                  |(FAST-BOUNDP-METHOD SLOT-OBJECT SPECIALIZERS)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT SPECIALIZERS)|
1170                  |(FAST-BOUNDP-METHOD SLOT-OBJECT PROTOTYPE)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT READERS)|
1171                  |(FAST-BOUNDP-METHOD SLOT-OBJECT TYPE)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT WRITERS)|
1172                  |(FAST-BOUNDP-METHOD SLOT-OBJECT OBJECT)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT OBJECT)|
1173                  |(FAST-BOUNDP-METHOD SLOT-OBJECT DEFSTRUCT-FORM)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT TYPE)|
1174                    |(FAST-BOUNDP-METHOD SLOT-OBJECT PROTOTYPE)|
1175                  |(FAST-BOUNDP-METHOD SLOT-OBJECT INITFORM)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT INITFORM)|
1176                  |(SETF SLOT-VALUE-USING-CLASS)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT DEFSTRUCT-FORM)|
1177                  |(SETF SLOT-DEFINITION-CLASS)|                  |(SETF SLOT-DEFINITION-CLASS)|
1178                  |(SETF SLOT-ACCESSOR-FUNCTION)|                  |(SETF SLOT-VALUE-USING-CLASS)|
                 |(SETF SLOT-DEFINITION-INITFUNCTION)|  
                 |(SETF SLOT-DEFINITION-ALLOCATION)|  
                 |(SETF SLOT-DEFINITION-INTERNAL-WRITER-FUNCTION)|  
                 |(SETF SLOT-DEFINITION-INTERNAL-READER-FUNCTION)|  
                 |(SETF SLOT-DEFINITION-BOUNDP-FUNCTION)|  
                 |(SETF SLOT-DEFINITION-WRITER-FUNCTION)|  
                 |(SETF SLOT-DEFINITION-READER-FUNCTION)|  
1179                  |(SETF SLOT-DEFINITION-LOCATION)|                  |(SETF SLOT-DEFINITION-LOCATION)|
1180                    |(SETF SLOT-DEFINITION-READER-FUNCTION)|
1181                    |(SETF SLOT-DEFINITION-WRITER-FUNCTION)|
1182                    |(SETF SLOT-DEFINITION-BOUNDP-FUNCTION)|
1183                    |(SETF SLOT-DEFINITION-INTERNAL-READER-FUNCTION)|
1184                    |(SETF SLOT-DEFINITION-INTERNAL-WRITER-FUNCTION)|
1185                    |(SETF SLOT-DEFINITION-ALLOCATION)|
1186                    |(SETF SLOT-DEFINITION-INITFUNCTION)|
1187                    |(SETF SLOT-ACCESSOR-FUNCTION)|
1188                  |(BOUNDP DEFSTRUCT-CONSTRUCTOR)|                  |(BOUNDP DEFSTRUCT-CONSTRUCTOR)|
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT PLIST)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT INCOMPATIBLE-SUPERCLASS-LIST)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT CAN-PRECEDE-LIST)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT CLASS-PRECEDENCE-LIST)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT LAMBDA-LIST)|  
1189                  |(FAST-BOUNDP-METHOD SLOT-OBJECT PRETTY-ARGLIST)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT PRETTY-ARGLIST)|
1190                  |(SETF SLOT-DEFINITION-WRITERS)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT LAMBDA-LIST)|
1191                    |(FAST-BOUNDP-METHOD SLOT-OBJECT CLASS-PRECEDENCE-LIST)|
1192                    |(FAST-BOUNDP-METHOD SLOT-OBJECT CAN-PRECEDE-LIST)|
1193                    |(FAST-BOUNDP-METHOD SLOT-OBJECT INCOMPATIBLE-SUPERCLASS-LIST)|
1194                    |(FAST-BOUNDP-METHOD SLOT-OBJECT PLIST)|
1195                  |(SETF SLOT-DEFINITION-READERS)|                  |(SETF SLOT-DEFINITION-READERS)|
1196                    |(SETF SLOT-DEFINITION-WRITERS)|
1197                  |(SETF SLOT-DEFINITION-TYPE)|                  |(SETF SLOT-DEFINITION-TYPE)|
1198                  |(SETF SLOT-DEFINITION-INITFORM)|                  |(SETF SLOT-DEFINITION-INITFORM)|
1199                  |(BOUNDP INITIALIZE-INFO)|                  |(BOUNDP INITIALIZE-INFO)|
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT FROM-DEFCLASS-P)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT DIRECT-METHODS)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT SLOTS)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT DIRECT-SLOTS)|  
                 |(FAST-BOUNDP-METHOD SLOT-OBJECT METHODS)|  
1200                  |(FAST-BOUNDP-METHOD SLOT-OBJECT OPTIONS)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT OPTIONS)|
1201                  |(FAST-BOUNDP-METHOD SLOT-OBJECT DIRECT-SUBCLASSES)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT METHODS)|
1202                    |(FAST-BOUNDP-METHOD SLOT-OBJECT DIRECT-SLOTS)|
1203                    |(FAST-BOUNDP-METHOD SLOT-OBJECT SLOTS)|
1204                    |(FAST-BOUNDP-METHOD SLOT-OBJECT DIRECT-METHODS)|
1205                    |(FAST-BOUNDP-METHOD SLOT-OBJECT FROM-DEFCLASS-P)|
1206                  |(FAST-BOUNDP-METHOD SLOT-OBJECT DIRECT-SUPERCLASSES)|                  |(FAST-BOUNDP-METHOD SLOT-OBJECT DIRECT-SUPERCLASSES)|
1207                    |(FAST-BOUNDP-METHOD SLOT-OBJECT DIRECT-SUBCLASSES)|
1208                  |(FAST-INTERNAL-READER-METHOD STANDARD-GENERIC-FUNCTION ARG-INFO)|                  |(FAST-INTERNAL-READER-METHOD STANDARD-GENERIC-FUNCTION ARG-INFO)|
1209                  |(BOUNDP INITARGS)| LONG-METHOD-COMBINATION-FUNCTION                  |(BOUNDP INITARGS)| LONG-METHOD-COMBINATION-FUNCTION
1210                  GENERIC-FUNCTION-P                  GENERIC-FUNCTION-P
1211                  |PCL::SLOT-DEFINITION class predicate|                  |PCL::SLOT-DEFINITION class predicate|
1212                  |LISP::NULL class predicate| |(READER NAME)|                  |LISP::NULL class predicate| |(READER NAME)|
1213                  |(READER CLASS)| |(FAST-METHOD SLOT-MISSING (T T T T))|                  |(READER CLASS)|
1214                  |(FAST-METHOD REMOVE-NAMED-METHOD (T T))|                  |(FAST-METHOD COMPUTE-EFFECTIVE-METHOD :AROUND (GENERIC-FUNCTION METHOD-COMBINATION T))|
1215                  |(FAST-METHOD SHARED-INITIALIZE :AFTER (STANDARD-METHOD T))|                  |(FAST-METHOD FIND-METHOD (STANDARD-GENERIC-FUNCTION T T))|
1216                  |(FAST-METHOD SHARED-INITIALIZE :BEFORE (STANDARD-ACCESSOR-METHOD T))|                  |(FAST-METHOD DEFAULT-INITARGS (SLOT-CLASS T))|
1217                  |(FAST-METHOD SHARED-INITIALIZE :AFTER (STRUCTURE-SLOT-DEFINITION T))|                  |(FAST-METHOD DESCRIBE-OBJECT (T T))|
1218                  |(FAST-METHOD SHARED-INITIALIZE :BEFORE (BUILT-IN-CLASS T))|                  |(FAST-METHOD DESCRIBE-OBJECT (SLOT-OBJECT T))|
1219                  |(FAST-METHOD WRITER-METHOD-CLASS (SLOT-CLASS T))|                  |(FAST-METHOD DESCRIBE-OBJECT (STANDARD-GENERIC-FUNCTION T))|
1220                  |(FAST-METHOD READER-METHOD-CLASS (SLOT-CLASS T))|                  |(FAST-METHOD DESCRIBE-OBJECT (CLASS T))|
1221                  |(FAST-METHOD SHARED-INITIALIZE :AFTER (STRUCTURE-CLASS T))|                  |(FAST-METHOD COMPUTE-APPLICABLE-METHODS-USING-CLASSES (GENERIC-FUNCTION T))|
1222                  |(FAST-METHOD (SETF DOCUMENTATION) (T T))|                  |(FAST-METHOD SLOT-ACCESSOR-FUNCTION (EFFECTIVE-SLOT-DEFINITION T))|
1223                  |(FAST-METHOD SHARED-INITIALIZE :AFTER (DOCUMENTATION-MIXIN T))|                  |(FAST-METHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION (SLOT-CLASS T))|
1224                  |(FAST-METHOD SHARED-INITIALIZE :AFTER (STD-CLASS T))|                  |(FAST-METHOD CLASS-SLOT-VALUE (STD-CLASS T))|
1225                  |(FAST-METHOD COMPUTE-SLOT-ACCESSOR-INFO (EFFECTIVE-SLOT-DEFINITION T T))|                  |(FAST-METHOD LEGAL-QUALIFIERS-P (STANDARD-METHOD T))|
1226                  |(FAST-METHOD (SETF SLOT-ACCESSOR-STD-P) (T EFFECTIVE-SLOT-DEFINITION T))|                  |(FAST-METHOD LEGAL-SPECIALIZERS-P (STANDARD-METHOD T))|
1227                  |(FAST-METHOD COMPUTE-EFFECTIVE-METHOD (GENERIC-FUNCTION SHORT-METHOD-COMBINATION T))|                  |(FAST-METHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS (STANDARD-OBJECT T T T))|
                 |(FAST-METHOD FIND-METHOD-COMBINATION (GENERIC-FUNCTION (EQL STANDARD) T))|  
                 |(FAST-METHOD SLOT-UNBOUND (T T T))|  
1228                  |(FAST-METHOD COMPUTE-EFFECTIVE-METHOD (GENERIC-FUNCTION LONG-METHOD-COMBINATION T))|                  |(FAST-METHOD COMPUTE-EFFECTIVE-METHOD (GENERIC-FUNCTION LONG-METHOD-COMBINATION T))|
1229                  |(FAST-METHOD SHARED-INITIALIZE (SLOT-OBJECT T))|                  |(FAST-METHOD SHARED-INITIALIZE (SLOT-OBJECT T))|
1230                  |(FAST-METHOD (SETF SLOT-ACCESSOR-FUNCTION) (T EFFECTIVE-SLOT-DEFINITION T))|                  |(FAST-METHOD (SETF SLOT-ACCESSOR-FUNCTION) (T EFFECTIVE-SLOT-DEFINITION T))|
# Line 1237  Line 1239 
1239                  |(FAST-METHOD SHARED-INITIALIZE :BEFORE (STANDARD-METHOD T))|                  |(FAST-METHOD SHARED-INITIALIZE :BEFORE (STANDARD-METHOD T))|
1240                  |(FAST-METHOD SHARED-INITIALIZE :AFTER (STANDARD-ACCESSOR-METHOD T))|                  |(FAST-METHOD SHARED-INITIALIZE :AFTER (STANDARD-ACCESSOR-METHOD T))|
1241                  |(FAST-METHOD SHARED-INITIALIZE :BEFORE (STANDARD-GENERIC-FUNCTION T))|                  |(FAST-METHOD SHARED-INITIALIZE :BEFORE (STANDARD-GENERIC-FUNCTION T))|
1242                  |(FAST-METHOD DEFAULT-INITARGS (SLOT-CLASS T))|                  |(FAST-METHOD SLOT-MISSING (T T T T))|
1243                  |(FAST-METHOD DESCRIBE-OBJECT (T T))|                  |(FAST-METHOD SLOT-UNBOUND (T T T))|
1244                  |(FAST-METHOD DESCRIBE-OBJECT (SLOT-OBJECT T))|                  |(FAST-METHOD FIND-METHOD-COMBINATION (GENERIC-FUNCTION (EQL STANDARD) T))|
1245                  |(FAST-METHOD DESCRIBE-OBJECT (STANDARD-GENERIC-FUNCTION T))|                  |(FAST-METHOD COMPUTE-EFFECTIVE-METHOD (GENERIC-FUNCTION SHORT-METHOD-COMBINATION T))|
1246                  |(FAST-METHOD DESCRIBE-OBJECT (CLASS T))|                  |(FAST-METHOD (SETF SLOT-ACCESSOR-STD-P) (T EFFECTIVE-SLOT-DEFINITION T))|
1247                  |(FAST-METHOD COMPUTE-APPLICABLE-METHODS-USING-CLASSES (GENERIC-FUNCTION T))|                  |(FAST-METHOD COMPUTE-SLOT-ACCESSOR-INFO (EFFECTIVE-SLOT-DEFINITION T T))|
1248                  |(FAST-METHOD SLOT-ACCESSOR-FUNCTION (EFFECTIVE-SLOT-DEFINITION T))|                  |(FAST-METHOD SHARED-INITIALIZE :AFTER (STD-CLASS T))|
1249                  |(FAST-METHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION (SLOT-CLASS T))|                  |(FAST-METHOD SHARED-INITIALIZE :AFTER (DOCUMENTATION-MIXIN T))|
1250                  |(FAST-METHOD CLASS-SLOT-VALUE (STD-CLASS T))|                  |(FAST-METHOD (SETF DOCUMENTATION) (T T))|
1251                  |(FAST-METHOD LEGAL-QUALIFIERS-P (STANDARD-METHOD T))|                  |(FAST-METHOD SHARED-INITIALIZE :AFTER (STRUCTURE-CLASS T))|
1252                  |(FAST-METHOD LEGAL-SPECIALIZERS-P (STANDARD-METHOD T))|                  |(FAST-METHOD READER-METHOD-CLASS (SLOT-CLASS T))|
1253                  |(FAST-METHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS (STANDARD-OBJECT T T T))|                  |(FAST-METHOD WRITER-METHOD-CLASS (SLOT-CLASS T))|
1254                    |(FAST-METHOD SHARED-INITIALIZE :BEFORE (BUILT-IN-CLASS T))|
1255                    |(FAST-METHOD SHARED-INITIALIZE :AFTER (STRUCTURE-SLOT-DEFINITION T))|
1256                    |(FAST-METHOD SHARED-INITIALIZE :BEFORE (STANDARD-ACCESSOR-METHOD T))|
1257                    |(FAST-METHOD SHARED-INITIALIZE :AFTER (STANDARD-METHOD T))|
1258                    |(FAST-METHOD REMOVE-NAMED-METHOD (T T))|
1259                  |(FAST-METHOD MAKE-READER-METHOD-FUNCTION (FUNCALLABLE-STANDARD-CLASS T))|                  |(FAST-METHOD MAKE-READER-METHOD-FUNCTION (FUNCALLABLE-STANDARD-CLASS T))|
1260                  |(FAST-METHOD MAKE-WRITER-METHOD-FUNCTION (FUNCALLABLE-STANDARD-CLASS T))|                  |(FAST-METHOD MAKE-WRITER-METHOD-FUNCTION (FUNCALLABLE-STANDARD-CLASS T))|
1261                  |(FAST-METHOD UPDATE-GF-DFUN (STD-CLASS T))|                  |(FAST-METHOD UPDATE-GF-DFUN (STD-CLASS T))|
# Line 1285  Line 1292 
1292                  |(FAST-METHOD LEGAL-SPECIALIZER-P (STANDARD-METHOD T))|                  |(FAST-METHOD LEGAL-SPECIALIZER-P (STANDARD-METHOD T))|
1293                  |(FAST-METHOD PRINT-OBJECT (GENERIC-FUNCTION T))|                  |(FAST-METHOD PRINT-OBJECT (GENERIC-FUNCTION T))|
1294                  |(FAST-METHOD COMPUTE-APPLICABLE-METHODS (GENERIC-FUNCTION T))|                  |(FAST-METHOD COMPUTE-APPLICABLE-METHODS (GENERIC-FUNCTION T))|
1295                  LEGAL-SLOT-NAME-P |(READER TYPE)| |(READER OBJECT)|                  LEGAL-SLOT-NAME-P |(READER OBJECT)| |(READER TYPE)|
1296                  CLASS-WRAPPER |(READER PLIST)|                  CLASS-WRAPPER |(READER PLIST)|
1297                  |(FAST-METHOD NO-APPLICABLE-METHOD (T))|                  |(FAST-METHOD NO-APPLICABLE-METHOD (T))|
                 |(FAST-METHOD DOCUMENTATION (T))|  
1298                  |(FAST-METHOD CLASS-PREDICATE-NAME (T))|                  |(FAST-METHOD CLASS-PREDICATE-NAME (T))|
1299                  |(READER SLOTS)| |(WRITER NAME)| DEFINITION-SOURCE                  |(FAST-METHOD DOCUMENTATION (T))| |(READER SLOTS)|
1300                    |(WRITER NAME)| DEFINITION-SOURCE
1301                  |PCL::SLOT-OBJECT class predicate| DEFAULT-INITARGS                  |PCL::SLOT-OBJECT class predicate| DEFAULT-INITARGS
1302                  |(WRITER CLASS)| CLASS-SLOT-VALUE |(WRITER TYPE)|                  |(WRITER CLASS)| CLASS-SLOT-VALUE |(WRITER OBJECT)|
1303                  |(WRITER OBJECT)|                  |(WRITER TYPE)|
1304                  |(FAST-METHOD ENSURE-CLASS-USING-CLASS (T NULL))|                  |(FAST-METHOD ENSURE-CLASS-USING-CLASS (T NULL))|
1305                  |(WRITER PLIST)| |(WRITER SLOTS)|                  |(WRITER PLIST)| |(WRITER SLOTS)|
1306                  |PCL::DOCUMENTATION-MIXIN class predicate|                  |PCL::DOCUMENTATION-MIXIN class predicate|
1307                  FORWARD-REFERENCED-CLASS-P GF-FAST-METHOD-FUNCTION-P                  FORWARD-REFERENCED-CLASS-P GF-FAST-METHOD-FUNCTION-P
1308                  LEGAL-QUALIFIER-P METHOD-P                  |LISP::REAL class predicate| LEGAL-QUALIFIER-P METHOD-P
1309                    |(COMBINED-METHOD COMPUTE-EFFECTIVE-METHOD)|
1310                    NO-PRIMARY-METHOD
1311                  |PCL::SPECIALIZER-WITH-OBJECT class predicate|                  |PCL::SPECIALIZER-WITH-OBJECT class predicate|
1312                  CLASS-SLOT-CELLS                  CLASS-SLOT-CELLS
                 |(COMBINED-METHOD INITIALIZE-INSTANCE)|  
1313                  |(COMBINED-METHOD REINITIALIZE-INSTANCE)|                  |(COMBINED-METHOD REINITIALIZE-INSTANCE)|
1314                    |(COMBINED-METHOD INITIALIZE-INSTANCE)|
1315                  STANDARD-ACCESSOR-METHOD-P |(SETF CLASS-NAME)|                  STANDARD-ACCESSOR-METHOD-P |(SETF CLASS-NAME)|
1316                  STANDARD-GENERIC-FUNCTION-P STANDARD-READER-METHOD-P                  STANDARD-METHOD-P STANDARD-READER-METHOD-P
1317                  STANDARD-METHOD-P |(READER WRAPPER)|                  STANDARD-GENERIC-FUNCTION-P |(READER WRAPPER)|
1318                  |(READER DEFSTRUCT-ACCESSOR-SYMBOL)|                  |(READER DEFSTRUCT-ACCESSOR-SYMBOL)|
1319                  |(READER CLASS-EQ-SPECIALIZER)|                  |(READER CLASS-EQ-SPECIALIZER)|
1320                    COMPUTE-DEFAULT-INITARGS
1321                  COMPUTE-EFFECTIVE-SLOT-DEFINITION-INITARGS                  COMPUTE-EFFECTIVE-SLOT-DEFINITION-INITARGS
1322                  COMPUTE-DEFAULT-INITARGS |(SETF CLASS-DEFSTRUCT-FORM)|                  |(SETF CLASS-DEFSTRUCT-FORM)|
1323                  |(CALL REAL-MAKE-METHOD-LAMBDA)|                  |(CALL REAL-MAKE-METHOD-LAMBDA)|
1324                  |(SETF CLASS-INCOMPATIBLE-SUPERCLASS-LIST)|                  |(SETF CLASS-INCOMPATIBLE-SUPERCLASS-LIST)|
1325                  |SETF PCL CLASS-SLOT-VALUE| |(SETF CLASS-SLOTS)|                  |SETF PCL CLASS-SLOT-VALUE| |(SETF CLASS-DIRECT-SLOTS)|
1326                  |(SETF CLASS-DIRECT-SLOTS)| |(READER OPERATOR)|                  |(SETF CLASS-SLOTS)| |(READER OPERATOR)|
1327                  |(CALL REAL-GET-METHOD)| |(CALL REAL-REMOVE-METHOD)|                  |(CALL REAL-ADD-METHOD)| |(CALL REAL-REMOVE-METHOD)|
1328                  |(CALL REAL-ADD-METHOD)| |(READER ARG-INFO)|                  |(CALL REAL-GET-METHOD)| |(READER ARG-INFO)|
1329                  METHOD-COMBINATION-TYPE                  METHOD-COMBINATION-TYPE
1330                  |(READER DEFSTRUCT-CONSTRUCTOR)|                  |(READER DEFSTRUCT-CONSTRUCTOR)|
1331                  |(INTERNAL-READER-METHOD STANDARD-GENERIC-FUNCTION ARG-INFO)|                  |(INTERNAL-READER-METHOD STANDARD-GENERIC-FUNCTION ARG-INFO)|
# Line 1327  Line 1337 
1337                  COMPUTE-SLOT-ACCESSOR-INFO |(READER INITARGS)|                  COMPUTE-SLOT-ACCESSOR-INFO |(READER INITARGS)|
1338                  |(WRITER CLASS-EQ-SPECIALIZER)|                  |(WRITER CLASS-EQ-SPECIALIZER)|
1339                  STANDARD-BOUNDP-METHOD-P |(SETF DOCUMENTATION)|                  STANDARD-BOUNDP-METHOD-P |(SETF DOCUMENTATION)|
1340                  RAW-INSTANCE-ALLOCATOR                  RAW-INSTANCE-ALLOCATOR |SETF PCL CLASS-INITIALIZE-INFO|
1341                  |SETF PCL SLOT-DEFINITION-DEFSTRUCT-ACCESSOR-SYMBOL|                  |SETF PCL SLOT-DEFINITION-DEFSTRUCT-ACCESSOR-SYMBOL|
1342                  |SETF PCL CLASS-INITIALIZE-INFO| |(WRITER OPERATOR)|                  |(WRITER OPERATOR)| |(WRITER ARG-INFO)|
                 |(WRITER ARG-INFO)|  
1343                  COMPUTE-DISCRIMINATING-FUNCTION-ARGLIST-INFO                  COMPUTE-DISCRIMINATING-FUNCTION-ARGLIST-INFO
1344                  STANDARD-WRITER-METHOD-P                  STANDARD-WRITER-METHOD-P
1345                  CLASS-INCOMPATIBLE-SUPERCLASS-LIST                  CLASS-INCOMPATIBLE-SUPERCLASS-LIST
# Line 1340  Line 1349 
1349                  METHOD-COMBINATION-DOCUMENTATION                  METHOD-COMBINATION-DOCUMENTATION
1350                  |SETF PCL SLOT-DEFINITION-INITARGS|                  |SETF PCL SLOT-DEFINITION-INITARGS|
1351                  REMOVE-BOUNDP-METHOD ADD-NAMED-METHOD                  REMOVE-BOUNDP-METHOD ADD-NAMED-METHOD
1352                  |LISP::CONS class predicate|                  |(WRITER INITARGS)|
1353                  |SETF PCL CLASS-DEFSTRUCT-CONSTRUCTOR|                  |SETF PCL CLASS-DEFSTRUCT-CONSTRUCTOR|
1354                  |(WRITER INITARGS)| |(BOUNDP METHOD)|                  |LISP::CONS class predicate| |(BOUNDP METHOD)|
                 |(FAST-WRITER-METHOD SLOT-OBJECT PREDICATE-NAME)|  
                 |(FAST-WRITER-METHOD CLASS NAME)|  
                 |(FAST-WRITER-METHOD SLOT-DEFINITION NAME)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT SLOT-NAME)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT DFUN-STATE)|  
                 |(FAST-WRITER-METHOD STANDARD-GENERIC-FUNCTION DFUN-STATE)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT NAME)|  
1355                  |(FAST-WRITER-METHOD STANDARD-GENERIC-FUNCTION NAME)|                  |(FAST-WRITER-METHOD STANDARD-GENERIC-FUNCTION NAME)|
1356                    |(FAST-WRITER-METHOD SLOT-OBJECT NAME)|
1357                    |(FAST-WRITER-METHOD STANDARD-GENERIC-FUNCTION DFUN-STATE)|
1358                    |(FAST-WRITER-METHOD SLOT-OBJECT DFUN-STATE)|
1359                    |(FAST-WRITER-METHOD SLOT-OBJECT SLOT-NAME)|
1360                    |(FAST-WRITER-METHOD SLOT-DEFINITION NAME)|
1361                    |(FAST-WRITER-METHOD CLASS NAME)|
1362                    |(FAST-WRITER-METHOD SLOT-OBJECT PREDICATE-NAME)|
1363                  |(BOUNDP SOURCE)| |(SETF GF-DFUN-STATE)|                  |(BOUNDP SOURCE)| |(SETF GF-DFUN-STATE)|
1364                  SHORT-COMBINATION-OPERATOR                  SHORT-COMBINATION-OPERATOR
                 |(FAST-WRITER-METHOD SLOT-OBJECT CLASS)|  
                 |(FAST-WRITER-METHOD SLOT-DEFINITION CLASS)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT ACCESSOR-FLAGS)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT METHOD-CLASS)|  
1365                  |(FAST-WRITER-METHOD STANDARD-GENERIC-FUNCTION METHOD-CLASS)|                  |(FAST-WRITER-METHOD STANDARD-GENERIC-FUNCTION METHOD-CLASS)|
1366                  |(FAST-WRITER-METHOD TRACED-METHOD GENERIC-FUNCTION)|                  |(FAST-WRITER-METHOD SLOT-OBJECT METHOD-CLASS)|
1367                  |(FAST-WRITER-METHOD SLOT-OBJECT INITFUNCTION)|                  |(FAST-WRITER-METHOD SLOT-OBJECT ACCESSOR-FLAGS)|
1368                  |(FAST-WRITER-METHOD SLOT-DEFINITION INITFUNCTION)|                  |(FAST-WRITER-METHOD SLOT-DEFINITION CLASS)|
1369                  |(FAST-WRITER-METHOD SLOT-OBJECT ALLOCATION)|                  |(FAST-WRITER-METHOD SLOT-OBJECT CLASS)|
                 |(FAST-WRITER-METHOD STANDARD-SLOT-DEFINITION ALLOCATION)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT INTERNAL-WRITER-FUNCTION)|  
                 |(FAST-WRITER-METHOD STRUCTURE-SLOT-DEFINITION INTERNAL-WRITER-FUNCTION)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT INTERNAL-READER-FUNCTION)|  
                 |(FAST-WRITER-METHOD STRUCTURE-SLOT-DEFINITION INTERNAL-READER-FUNCTION)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT BOUNDP-FUNCTION)|  
                 |(FAST-WRITER-METHOD EFFECTIVE-SLOT-DEFINITION BOUNDP-FUNCTION)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT WRITER-FUNCTION)|  
                 |(FAST-WRITER-METHOD EFFECTIVE-SLOT-DEFINITION WRITER-FUNCTION)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT READER-FUNCTION)|  
                 |(FAST-WRITER-METHOD EFFECTIVE-SLOT-DEFINITION READER-FUNCTION)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT LOCATION)|  
                 |(FAST-WRITER-METHOD STANDARD-EFFECTIVE-SLOT-DEFINITION LOCATION)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT FAST-FUNCTION)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT FUNCTION)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT GENERIC-FUNCTION)|  
                 |(FAST-WRITER-METHOD STANDARD-METHOD GENERIC-FUNCTION)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT SLOT-DEFINITION)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT METHOD-COMBINATION)|  
                 |(FAST-WRITER-METHOD STANDARD-GENERIC-FUNCTION METHOD-COMBINATION)|  
1370                  |(FAST-WRITER-METHOD SLOT-OBJECT DOCUMENTATION)|                  |(FAST-WRITER-METHOD SLOT-OBJECT DOCUMENTATION)|
1371                  |(FAST-WRITER-METHOD SLOT-OBJECT WRITERS)|                  |(FAST-WRITER-METHOD STANDARD-GENERIC-FUNCTION METHOD-COMBINATION)|
1372                  |(FAST-WRITER-METHOD SLOT-DEFINITION WRITERS)|                  |(FAST-WRITER-METHOD SLOT-OBJECT METHOD-COMBINATION)|
1373                  |(FAST-WRITER-METHOD SLOT-OBJECT READERS)|                  |(FAST-WRITER-METHOD SLOT-OBJECT SLOT-DEFINITION)|
1374                  |(FAST-WRITER-METHOD SLOT-DEFINITION READERS)|                  |(FAST-WRITER-METHOD STANDARD-METHOD GENERIC-FUNCTION)|
1375                    |(FAST-WRITER-METHOD SLOT-OBJECT GENERIC-FUNCTION)|
1376                    |(FAST-WRITER-METHOD SLOT-OBJECT FUNCTION)|
1377                    |(FAST-WRITER-METHOD SLOT-OBJECT FAST-FUNCTION)|
1378                    |(FAST-WRITER-METHOD STANDARD-EFFECTIVE-SLOT-DEFINITION LOCATION)|
1379                    |(FAST-WRITER-METHOD SLOT-OBJECT LOCATION)|
1380                    |(FAST-WRITER-METHOD EFFECTIVE-SLOT-DEFINITION READER-FUNCTION)|
1381                    |(FAST-WRITER-METHOD SLOT-OBJECT READER-FUNCTION)|
1382                    |(FAST-WRITER-METHOD EFFECTIVE-SLOT-DEFINITION WRITER-FUNCTION)|
1383                    |(FAST-WRITER-METHOD SLOT-OBJECT WRITER-FUNCTION)|
1384                    |(FAST-WRITER-METHOD EFFECTIVE-SLOT-DEFINITION BOUNDP-FUNCTION)|
1385                    |(FAST-WRITER-METHOD SLOT-OBJECT BOUNDP-FUNCTION)|
1386                    |(FAST-WRITER-METHOD STRUCTURE-SLOT-DEFINITION INTERNAL-READER-FUNCTION)|
1387                    |(FAST-WRITER-METHOD SLOT-OBJECT INTERNAL-READER-FUNCTION)|
1388                    |(FAST-WRITER-METHOD STRUCTURE-SLOT-DEFINITION INTERNAL-WRITER-FUNCTION)|
1389                    |(FAST-WRITER-METHOD SLOT-OBJECT INTERNAL-WRITER-FUNCTION)|
1390                    |(FAST-WRITER-METHOD STANDARD-SLOT-DEFINITION ALLOCATION)|
1391                    |(FAST-WRITER-METHOD SLOT-OBJECT ALLOCATION)|
1392                    |(FAST-WRITER-METHOD SLOT-DEFINITION INITFUNCTION)|
1393                    |(FAST-WRITER-METHOD SLOT-OBJECT INITFUNCTION)|
1394                    |(FAST-WRITER-METHOD TRACED-METHOD GENERIC-FUNCTION)|
1395                  |(FAST-WRITER-METHOD SLOT-OBJECT SPECIALIZERS)|                  |(FAST-WRITER-METHOD SLOT-OBJECT SPECIALIZERS)|
1396                  |(FAST-WRITER-METHOD SLOT-OBJECT PROTOTYPE)|                  |(FAST-WRITER-METHOD SLOT-DEFINITION READERS)|
1397                  |(FAST-WRITER-METHOD SLOT-DEFINITION TYPE)|                  |(FAST-WRITER-METHOD SLOT-OBJECT READERS)|
1398                  |(FAST-WRITER-METHOD SLOT-OBJECT TYPE)|                  |(FAST-WRITER-METHOD SLOT-DEFINITION WRITERS)|
1399                  |(FAST-WRITER-METHOD SLOT-OBJECT IDENTITY-WITH-ONE-ARGUMENT)|                  |(FAST-WRITER-METHOD SLOT-OBJECT WRITERS)|
1400                  |(FAST-WRITER-METHOD SLOT-OBJECT OBJECT)|                  |(FAST-WRITER-METHOD SLOT-OBJECT OBJECT)|
1401                    |(FAST-WRITER-METHOD SLOT-OBJECT IDENTITY-WITH-ONE-ARGUMENT)|
1402                    |(FAST-WRITER-METHOD SLOT-OBJECT TYPE)|
1403                    |(FAST-WRITER-METHOD SLOT-DEFINITION TYPE)|
1404                    |(FAST-WRITER-METHOD SLOT-OBJECT PROTOTYPE)|
1405                  REMOVE-NAMED-METHOD                  REMOVE-NAMED-METHOD
                 |(FAST-WRITER-METHOD SLOT-OBJECT DEFSTRUCT-FORM)|  
                 |(FAST-WRITER-METHOD STRUCTURE-CLASS DEFSTRUCT-FORM)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT INITFORM)|  
1406                  |(FAST-WRITER-METHOD SLOT-DEFINITION INITFORM)|                  |(FAST-WRITER-METHOD SLOT-DEFINITION INITFORM)|
1407                  |(FAST-WRITER-METHOD SLOT-OBJECT PLIST)|                  |(FAST-WRITER-METHOD SLOT-OBJECT INITFORM)|
1408                  |(FAST-WRITER-METHOD PLIST-MIXIN PLIST)|                  |(FAST-WRITER-METHOD STRUCTURE-CLASS DEFSTRUCT-FORM)|
1409                  |(FAST-WRITER-METHOD SLOT-OBJECT INCOMPATIBLE-SUPERCLASS-LIST)|                  |(FAST-WRITER-METHOD SLOT-OBJECT DEFSTRUCT-FORM)|
                 |(FAST-WRITER-METHOD PCL-CLASS INCOMPATIBLE-SUPERCLASS-LIST)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT CAN-PRECEDE-LIST)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT CLASS-PRECEDENCE-LIST)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT LAMBDA-LIST)|  
                 |(FAST-WRITER-METHOD SLOT-OBJECT PRETTY-ARGLIST)|  
1410                  |(FAST-WRITER-METHOD STANDARD-GENERIC-FUNCTION PRETTY-ARGLIST)|                  |(FAST-WRITER-METHOD STANDARD-GENERIC-FUNCTION PRETTY-ARGLIST)|
1411                    |(FAST-WRITER-METHOD SLOT-OBJECT PRETTY-ARGLIST)|
1412                    |(FAST-WRITER-METHOD SLOT-OBJECT LAMBDA-LIST)|
1413                    |(FAST-WRITER-METHOD SLOT-OBJECT CLASS-PRECEDENCE-LIST)|
1414                    |(FAST-WRITER-METHOD SLOT-OBJECT CAN-PRECEDE-LIST)|
1415                    |(FAST-WRITER-METHOD PCL-CLASS INCOMPATIBLE-SUPERCLASS-LIST)|
1416                    |(FAST-WRITER-METHOD SLOT-OBJECT INCOMPATIBLE-SUPERCLASS-LIST)|
1417                    |(FAST-WRITER-METHOD PLIST-MIXIN PLIST)|
1418                    |(FAST-WRITER-METHOD SLOT-OBJECT PLIST)|
1419                  LEGAL-DOCUMENTATION-P CLASS-DIRECT-SUPERCLASSES                  LEGAL-DOCUMENTATION-P CLASS-DIRECT-SUPERCLASSES
1420                  CLASS-DIRECT-SUBCLASSES CLASS-DIRECT-DEFAULT-INITARGS                  CLASS-DIRECT-SUBCLASSES CLASS-DIRECT-DEFAULT-INITARGS
1421                  SLOT-DEFINITION-READERS SLOT-VALUE-USING-CLASS                  SLOT-DEFINITION-READERS SLOT-VALUE-USING-CLASS
# Line 1418  Line 1427 
1427                  METHOD-FUNCTION DIRECT-SLOT-DEFINITION-CLASS                  METHOD-FUNCTION DIRECT-SLOT-DEFINITION-CLASS
1428                  MAKE-METHOD-LAMBDA EFFECTIVE-SLOT-DEFINITION-CLASS                  MAKE-METHOD-LAMBDA EFFECTIVE-SLOT-DEFINITION-CLASS
1429                  CLASS-SLOTS COMPUTE-SLOTS SLOT-DEFINITION-NAME                  CLASS-SLOTS COMPUTE-SLOTS SLOT-DEFINITION-NAME
1430                  FINALIZE-INHERITANCE GENERIC-FUNCTION-LAMBDA-LIST                  FINALIZE-INHERITANCE
1431                    GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER
1432                    GENERIC-FUNCTION-LAMBDA-LIST NO-NEXT-METHOD
1433                  CLASS-DIRECT-SLOTS CLASS-DEFAULT-INITARGS                  CLASS-DIRECT-SLOTS CLASS-DEFAULT-INITARGS
1434                  COMPUTE-DISCRIMINATING-FUNCTION CLASS-FINALIZED-P                  COMPUTE-DISCRIMINATING-FUNCTION CLASS-FINALIZED-P
1435                  GENERIC-FUNCTION-NAME REMOVE-DEPENDENT                  GENERIC-FUNCTION-NAME REMOVE-DEPENDENT
# Line 1432  Line 1443 
1443                  ADD-DIRECT-SUBCLASS SPECIALIZER-DIRECT-METHODS                  ADD-DIRECT-SUBCLASS SPECIALIZER-DIRECT-METHODS
1444                  GENERIC-FUNCTION-METHOD-COMBINATION ALLOCATE-INSTANCE                  GENERIC-FUNCTION-METHOD-COMBINATION ALLOCATE-INSTANCE
1445                  COMPUTE-EFFECTIVE-METHOD SLOT-DEFINITION-TYPE                  COMPUTE-EFFECTIVE-METHOD SLOT-DEFINITION-TYPE
1446                  SLOT-UNBOUND INITIALIZE-INSTANCE FUNCTION-KEYWORDS                  SLOT-UNBOUND INITIALIZE-INSTANCE FIND-METHOD
1447                  REINITIALIZE-INSTANCE VALIDATE-SUPERCLASS                  FUNCTION-KEYWORDS REINITIALIZE-INSTANCE
1448                  GENERIC-FUNCTION-METHODS REMOVE-DIRECT-METHOD                  VALIDATE-SUPERCLASS GENERIC-FUNCTION-METHODS
1449                  METHOD-LAMBDA-LIST MAKE-INSTANCE                  REMOVE-DIRECT-METHOD METHOD-LAMBDA-LIST MAKE-INSTANCE
1450                    GENERIC-FUNCTION-DECLARATIONS
1451                  COMPUTE-EFFECTIVE-SLOT-DEFINITION PRINT-OBJECT                  COMPUTE-EFFECTIVE-SLOT-DEFINITION PRINT-OBJECT
1452                  METHOD-QUALIFIERS METHOD-GENERIC-FUNCTION                  METHOD-QUALIFIERS METHOD-GENERIC-FUNCTION
1453                  REMOVE-DIRECT-SUBCLASS MAKE-INSTANCES-OBSOLETE                  REMOVE-DIRECT-SUBCLASS MAKE-INSTANCES-OBSOLETE

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26