1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
|
;;; Definitions for package SLOT-ACCESSOR-NAME of type ESTABLISH
(LISP::IN-PACKAGE "SLOT-ACCESSOR-NAME" :USE LISP::NIL :NICKNAMES
'("S-A-N"))
;;; Definitions for package PCL of type ESTABLISH
(LISP::IN-PACKAGE "PCL" :USE LISP::NIL)
;;; Definitions for package ITERATE of type ESTABLISH
(LISP::IN-PACKAGE "ITERATE" :USE LISP::NIL)
;;; Definitions for package WALKER of type ESTABLISH
(LISP::IN-PACKAGE "WALKER" :USE LISP::NIL)
;;; Definitions for package SLOT-ACCESSOR-NAME of type EXPORT
(LISP::IN-PACKAGE "SLOT-ACCESSOR-NAME" :USE 'LISP::NIL :NICKNAMES
'("S-A-N"))
(LISP::IMPORT 'LISP::NIL)
(LISP::EXPORT 'LISP::NIL)
;;; Definitions for package PCL of type EXPORT
(LISP::IN-PACKAGE "PCL" :USE '("LISP" "ITERATE" "WALKER"))
(LISP::IMPORT 'LISP::NIL)
(LISP::EXPORT
'(PCL::CLASS-PRECEDENCE-LIST PCL::SLOT-DEFINITION
PCL::COMPUTE-APPLICABLE-METHODS-USING-CLASSES
PCL::SLOT-DEFINITION-WRITERS PCL::CLASS-OF
PCL::NO-APPLICABLE-METHOD PCL::STANDARD-WRITER-METHOD
PCL::ENSURE-CLASS-USING-CLASS PCL::ENSURE-GENERIC-FUNCTION
PCL::FIND-METHOD-COMBINATION PCL::UPDATE-DEPENDENT
PCL::MAP-DEPENDENTS PCL::SLOT-MISSING PCL::SPECIALIZER
PCL::CALL-NEXT-METHOD PCL::ENSURE-GENERIC-FUNCTION-USING-CLASS
PCL::SLOT-MAKUNBOUND-USING-CLASS PCL::MAKE-INSTANCES-OBSOLETE
PCL::INTERN-EQL-SPECIALIZER PCL::REMOVE-DIRECT-SUBCLASS
PCL::METHOD-GENERIC-FUNCTION PCL::METHOD-QUALIFIERS
PCL::FUNCALLABLE-STANDARD-CLASS PCL::EXTRACT-LAMBDA-LIST
PCL::STANDARD-CLASS PCL::PRINT-OBJECT PCL::STRUCTURE-CLASS
PCL::COMPUTE-EFFECTIVE-SLOT-DEFINITION
PCL::GENERIC-FUNCTION-DECLARATIONS PCL::MAKE-INSTANCE
PCL::METHOD-LAMBDA-LIST PCL::DEFGENERIC
PCL::REMOVE-DIRECT-METHOD PCL::STANDARD-DIRECT-SLOT-DEFINITION
PCL::GENERIC-FUNCTION-METHODS PCL::VALIDATE-SUPERCLASS
PCL::REINITIALIZE-INSTANCE PCL::STANDARD-METHOD
PCL::STANDARD-ACCESSOR-METHOD
PCL::FUNCALLABLE-STANDARD-INSTANCE PCL::FUNCTION-KEYWORDS
PCL::STANDARD PCL::FIND-METHOD PCL::EXTRACT-SPECIALIZER-NAMES
PCL::INITIALIZE-INSTANCE PCL::GENERIC-FLET PCL::SLOT-UNBOUND
PCL::STANDARD-INSTANCE PCL::SLOT-DEFINITION-TYPE
PCL::COMPUTE-EFFECTIVE-METHOD PCL::ALLOCATE-INSTANCE
PCL::SYMBOL-MACROLET PCL::GENERIC-FUNCTION
PCL::GENERIC-FUNCTION-METHOD-COMBINATION
PCL::SPECIALIZER-DIRECT-METHODS PCL::ADD-DIRECT-SUBCLASS
PCL::WRITER-METHOD-CLASS PCL::SLOT-DEFINITION-INITARGS
PCL::METHOD-SPECIALIZERS PCL::GENERIC-FUNCTION-METHOD-CLASS
PCL::ADD-METHOD PCL::WITH-ACCESSORS
PCL::SLOT-DEFINITION-ALLOCATION
PCL::SLOT-DEFINITION-INITFUNCTION
PCL::SLOT-DEFINITION-LOCATION PCL::ADD-DIRECT-METHOD
PCL::SLOT-BOUNDP PCL::EQL-SPECIALIZER PCL::SHARED-INITIALIZE
PCL::STANDARD-GENERIC-FUNCTION
PCL::ACCESSOR-METHOD-SLOT-DEFINITION
PCL::SLOT-BOUNDP-USING-CLASS PCL::ADD-DEPENDENT
PCL::SPECIALIZER-DIRECT-GENERIC-FUNCTION
PCL::WITH-ADDED-METHODS PCL::COMPUTE-CLASS-PRECEDENCE-LIST
PCL::REMOVE-DEPENDENT PCL::NEXT-METHOD-P
PCL::GENERIC-FUNCTION-NAME PCL::SLOT-VALUE
PCL::EFFECTIVE-SLOT-DEFINITION PCL::CLASS-FINALIZED-P
PCL::COMPUTE-DISCRIMINATING-FUNCTION PCL::STANDARD-OBJECT
PCL::CLASS-DEFAULT-INITARGS PCL::CLASS-DIRECT-SLOTS
PCL::FUNCALLABLE-STANDARD-INSTANCE-ACCESS PCL::BUILT-IN-CLASS
PCL::NO-NEXT-METHOD PCL::SLOT-MAKUNBOUND
PCL::STANDARD-READER-METHOD PCL::GENERIC-FUNCTION-LAMBDA-LIST
PCL::GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER
PCL::INVALID-METHOD-ERROR PCL::METHOD-COMBINATION-ERROR
PCL::SLOT-EXISTS-P PCL::FINALIZE-INHERITANCE
PCL::SLOT-DEFINITION-NAME
PCL::STANDARD-EFFECTIVE-SLOT-DEFINITION PCL::COMPUTE-SLOTS
PCL::CLASS-SLOTS PCL::EFFECTIVE-SLOT-DEFINITION-CLASS
PCL::STANDARD-INSTANCE-ACCESS PCL::WITH-SLOTS
PCL::DIRECT-SLOT-DEFINITION PCL::DEFINE-METHOD-COMBINATION
PCL::MAKE-METHOD-LAMBDA PCL::ENSURE-CLASS
PCL::DIRECT-SLOT-DEFINITION-CLASS PCL::METHOD-FUNCTION
PCL::STANDARD-SLOT-DEFINITION PCL::CHANGE-CLASS PCL::DEFMETHOD
PCL::UPDATE-INSTANCE-FOR-DIFFERENT-CLASS
PCL::UPDATE-INSTANCE-FOR-REDEFINED-CLASS
PCL::FORWARD-REFERENCED-CLASS PCL::SLOT-DEFINITION-INITFORM
PCL::REMOVE-METHOD PCL::READER-METHOD-CLASS PCL::CALL-METHOD
PCL::CLASS-PROTOTYPE PCL::CLASS-NAME PCL::FIND-CLASS
PCL::DEFCLASS PCL::COMPUTE-APPLICABLE-METHODS
PCL::SLOT-VALUE-USING-CLASS PCL::METHOD-COMBINATION
PCL::EQL-SPECIALIZER-INSTANCE PCL::GENERIC-LABELS PCL::METHOD
PCL::SLOT-DEFINITION-READERS
PCL::CLASS-DIRECT-DEFAULT-INITARGS
PCL::CLASS-DIRECT-SUBCLASSES PCL::CLASS-DIRECT-SUPERCLASSES
PCL::SET-FUNCALLABLE-INSTANCE-FUNCTION))
;;; Definitions for package ITERATE of type EXPORT
(LISP::IN-PACKAGE "ITERATE" :USE '("WALKER" "LISP"))
(LISP::IMPORT 'LISP::NIL)
(LISP::EXPORT
'(ITERATE::SUMMING ITERATE::MINIMIZING ITERATE::PLIST-ELEMENTS
ITERATE::ITERATE* ITERATE::MAXIMIZING ITERATE::LIST-TAILS
ITERATE::*ITERATE-WARNINGS* ITERATE::GATHERING
ITERATE::EACHTIME ITERATE::ELEMENTS ITERATE::GATHER
ITERATE::LIST-ELEMENTS ITERATE::WHILE ITERATE::ITERATE
ITERATE::UNTIL ITERATE::JOINING ITERATE::COLLECTING
ITERATE::WITH-GATHERING ITERATE::INTERVAL))
;;; Definitions for package WALKER of type EXPORT
(LISP::IN-PACKAGE "WALKER" :USE '("LISP"))
(LISP::IMPORT 'LISP::NIL)
(LISP::EXPORT
'(WALKER::DEFINE-WALKER-TEMPLATE WALKER::*VARIABLE-DECLARATIONS*
WALKER::NESTED-WALK-FORM WALKER::VARIABLE-DECLARATION
WALKER::WALK-FORM-EXPAND-MACROS-P WALKER::VARIABLE-LEXICAL-P
WALKER::VARIABLE-SPECIAL-P WALKER::WALK-FORM
WALKER::MACROEXPAND-ALL WALKER::VARIABLE-GLOBALLY-SPECIAL-P))
;;; Definitions for package SLOT-ACCESSOR-NAME of type SHADOW
(LISP::IN-PACKAGE "SLOT-ACCESSOR-NAME")
(LISP::SHADOW 'LISP::NIL)
(LISP::SHADOWING-IMPORT 'LISP::NIL)
(LISP::IMPORT 'LISP::NIL)
;;; Definitions for package PCL of type SHADOW
(LISP::IN-PACKAGE "PCL")
(LISP::SHADOW '(PCL::DOTIMES PCL::DOCUMENTATION))
(LISP::SHADOWING-IMPORT 'LISP::NIL)
(LISP::IMPORT
'(SYSTEM::STRUCTURE-REF SYSTEM::STRUCTURE-DEF SYSTEM::STRUCTUREP))
;;; Definitions for package ITERATE of type SHADOW
(LISP::IN-PACKAGE "ITERATE")
(LISP::SHADOW 'LISP::NIL)
(LISP::SHADOWING-IMPORT 'LISP::NIL)
(LISP::IMPORT 'LISP::NIL)
;;; Definitions for package WALKER of type SHADOW
(LISP::IN-PACKAGE "WALKER")
(LISP::SHADOW 'LISP::NIL)
(LISP::SHADOWING-IMPORT 'LISP::NIL)
(LISP::IMPORT 'LISP::NIL)
(lisp::in-package 'SI)
(export '(%structure-name
%compiled-function-name
%set-compiled-function-name))
(in-package 'pcl)
|
