1 |
|
(makunbound 'b) B |
2 |
|
(makunbound 'e) E |
3 |
|
|
4 |
|
(SETQ Z 2) 2 |
5 |
|
|
6 |
|
((LAMBDA (Z) (DECLARE (SPECIAL Z)) (LIST Z (SYMBOL-VALUE 'Z))) 3) |
7 |
|
(3 3) |
8 |
|
|
9 |
|
(MAKUNBOUND 'Z) Z |
10 |
|
|
11 |
|
((LAMBDA (A B) (+ A (* B 3))) 4 5) |
12 |
|
19 |
13 |
|
|
14 |
|
((LAMBDA (A &OPTIONAL (B 2)) (+ A (* B 3))) 4 5) |
15 |
|
19 |
16 |
|
|
17 |
|
((LAMBDA (A &OPTIONAL (B 2)) (+ A (* B 3))) 4) |
18 |
|
10 |
19 |
|
|
20 |
|
((LAMBDA (&OPTIONAL (A 2 B) (C 3 D) &REST X) (LIST A B C D X))) |
21 |
|
(2 NIL 3 NIL NIL) |
22 |
|
|
23 |
|
((LAMBDA (&OPTIONAL (A 2 B) (C 3 D) &REST X) (LIST A B C D X)) 6) |
24 |
|
(6 T 3 NIL NIL) |
25 |
|
|
26 |
|
((LAMBDA (&OPTIONAL (A 2 B) (C 3 D) &REST X) (LIST A B C D X)) 6 3) |
27 |
|
(6 T 3 T NIL) |
28 |
|
|
29 |
|
((LAMBDA (&OPTIONAL (A 2 B) (C 3 D) &REST X) (LIST A B C D X)) 6 3 |
30 |
|
8) |
31 |
|
(6 T 3 T (8)) |
32 |
|
|
33 |
|
((LAMBDA (&OPTIONAL (A 2 B) (C 3 D) &REST X) (LIST A B C D X)) 6 3 |
34 |
|
8 9 10 11) |
35 |
|
(6 T 3 T (8 9 10 11)) |
36 |
|
|
37 |
|
((LAMBDA (A B &KEY C D) (LIST A B C D)) 1 2) |
38 |
|
(1 2 NIL NIL) |
39 |
|
|
40 |
|
((LAMBDA (A B &KEY C D) (LIST A B C D)) 1 2 :C 6) |
41 |
|
(1 2 6 NIL) |
42 |
|
|
43 |
|
((LAMBDA (A B &KEY C D) (LIST A B C D)) 1 2 :D 8) |
44 |
|
(1 2 NIL 8) |
45 |
|
|
46 |
|
((LAMBDA (A B &KEY C D) (LIST A B C D)) 1 2 :C 6 :D 8) |
47 |
|
(1 2 6 8) |
48 |
|
|
49 |
|
((LAMBDA (A B &KEY C D) (LIST A B C D)) 1 2 :D 8 :C 6) |
50 |
|
(1 2 6 8) |
51 |
|
|
52 |
|
((LAMBDA (A B &KEY C D) (LIST A B C D)) :A 1 :D 8 :C 6) |
53 |
|
(:A 1 6 8) |
54 |
|
|
55 |
|
((LAMBDA (A B &KEY C D) (LIST A B C D)) :A :B :C :D) |
56 |
|
(:A :B :D NIL) |
57 |
|
|
58 |
|
((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) |
59 |
|
1) |
60 |
|
(1 3 NIL 1 NIL) |
61 |
|
|
62 |
|
((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) |
63 |
|
1 2) |
64 |
|
(1 2 NIL 1 NIL) |
65 |
|
|
66 |
|
((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) |
67 |
|
:C 7) |
68 |
|
(:C 7 NIL :C NIL) |
69 |
|
|
70 |
|
((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) |
71 |
|
1 6 :C 7) |
72 |
|
(1 6 7 1 (:C 7)) |
73 |
|
|
74 |
|
((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) |
75 |
|
1 6 :D 8) |
76 |
|
(1 6 NIL 8 (:D 8)) |
77 |
|
|
78 |
|
((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) |
79 |
|
1 6 :D 8 :C |
80 |
|
9 :D 10) |
81 |
|
(1 6 9 8 (:D 8 :C 9 :D 10)) |
82 |
|
|
83 |
|
((LAMBDA (X &AUX (A 3) (B 4)) (+ X (* A B))) 2) |
84 |
|
14 |
85 |
|
|
86 |
|
((LAMBDA (X Y &OPTIONAL A B &REST Z &KEY C (D Y) &AUX (U 3) (V 4)) |
87 |
|
|
88 |
|
(+ X Y A (* B (CAR Z)) C (* D U) V)) 3 4 5 2 7 :C 6 :D 8) |
89 |
|
ERROR |
90 |
|
|
91 |
|
((LAMBDA (X Y &OPTIONAL A B &REST Z &KEY C (D Y) &AUX (U 3) (V 4)) |
92 |
|
|
93 |
|
(+ X Y A (* B (CAR Z)) C (* D U) V)) 3 4 5 2 7 :C 6) |
94 |
|
ERROR |
95 |
|
|
96 |
|
((LAMBDA (X &AUX C) (CONS X C)) (QUOTE A)) |
97 |
|
(A) |
98 |
|
|
99 |
|
((LAMBDA (X &REST Y Z) (LIST X Y Z)) 1 2 3) |
100 |
|
ERROR |
101 |
|
|
102 |
|
((LAMBDA (5 A B) (LIST A B)) 1 2) |
103 |
|
ERROR |
104 |
|
|
105 |
|
((LAMBDA ((LENGTH (QUOTE (A B))) C) (LIST C)) 1) |
106 |
|
ERROR |
107 |
|
|
108 |
|
((LAMBDA (X &KEY :Y :Z) (LIST X Y Z)) 1 :Y 2 :Z 3) |
109 |
|
ERROR |
110 |
|
|
111 |
|
((LAMBDA (X Y) (LIST X Y Z)) 1 2) |
112 |
|
ERROR |
113 |
|
|
114 |
|
((LAMBDA (X Y) (LIST X Y Z)) 1 2 3) |
115 |
|
ERROR |
116 |
|
|
117 |
|
((LAMBDA (&OPTIONAL) (LIST A B C)) 1) |
118 |
|
ERROR |
119 |
|
|
120 |
|
((LAMBDA (&OPTIONAL (A)) (LIST A)) 1) |
121 |
|
(1) |
122 |
|
|
123 |
|
((LAMBDA (&OPTIONAL (A B)) (LIST A B)) 1) |
124 |
|
ERROR |
125 |
|
|
126 |
|
((LAMBDA (&OPTIONAL (A 3 B)) (LIST A B)) 1) |
127 |
|
(1 T) |
128 |
|
|
129 |
|
((LAMBDA (&OPTIONAL (A 3)) (LIST A)) 1) |
130 |
|
(1) |
131 |
|
|
132 |
|
((LAMBDA (&OPTIONAL (A 3 B 4)) (LIST A B)) 1) |
133 |
|
#+XCL (1 T) |
134 |
|
#-XCL ERROR |
135 |
|
|
136 |
|
((LAMBDA (X) (LIST X Y)) 1 2) |
137 |
|
ERROR |
138 |
|
|
139 |
|
((LAMBDA (X) (LIST X)) 1 2) |
140 |
|
ERROR |
141 |
|
|
142 |
|
((LAMBDA (#\a) (LIST A)) 1) |
143 |
|
ERROR |
144 |
|
|
145 |
|
((LAMBDA (#*10) (LIST 1 2 3))) |
146 |
|
ERROR |
147 |
|
|
148 |
|
((LAMBDA (X Y) ((LAMBDA (A B) (LIST A B)) (QUOTE U) (QUOTE V))) 5 6) |
149 |
|
(U V) |
150 |
|
|
151 |
|
((LAMBDA (X Y) (LIST X Y)) 1) |
152 |
|
ERROR |
153 |
|
|
154 |
|
((LAMBDA (X &REST Y &OPTIONAL (Z 5)) (LIST X Y Z)) 1 3) |
155 |
|
ERROR |
156 |
|
|
157 |
|
((LAMBDA (X &X) (LIST X)) 7) |
158 |
|
ERROR |
159 |
|
|
160 |
|
((LAMBDA (X &AUX) (LIST X)) 6) |
161 |
|
(6) |
162 |
|
|
163 |
|
((LAMBDA (X &AUX Y) (LIST X Y)) 6) |
164 |
|
(6 NIL) |
165 |
|
|
166 |
|
((LAMBDA (X &AUX (Y)) (LIST X Y)) 6) |
167 |
|
(6 NIL) |
168 |
|
|
169 |
|
((LAMBDA (X &REST) (LIST X)) 2) |
170 |
|
ERROR |
171 |
|
|
172 |
|
((LAMBDA (X &KEY) (LIST X)) 3) |
173 |
|
(3) |
174 |
|
|
175 |
|
((LAMBDA (X &KEY Y) (LIST X)) 3) |
176 |
|
(3) |
177 |
|
|
178 |
|
((LAMBDA (X &KEY Y) (LIST X)) 3 :Y) |
179 |
|
ERROR |
180 |
|
|
181 |
|
((LAMBDA (X &KEY Y) (LIST X)) :\3) |
182 |
|
(:\3) |
183 |
|
|
184 |
|
((LAMBDA NIL (LIST 1 2 3))) |
185 |
|
(1 2 3) |
186 |
|
|
187 |
|
((LAMBDA NIL (LIST 1 2 3)) 4 5) |
188 |
|
ERROR |
189 |
|
|
190 |
|
((LAMBDA (LIST 1 2 3))) |
191 |
|
ERROR |
192 |
|
|
193 |
|
((LAMBDA (X))) |
194 |
|
ERROR |
195 |
|
|
196 |
|
((LAMBDA (&AUX &KEY &REST &OPTIONAL))) |
197 |
|
ERROR |
198 |
|
|
199 |
|
((LAMBDA (A B &KEY C D &ALLOW-OTHER-KEYS) (LIST A B C D E F)) 1 2 :C |
200 |
|
6 :D 8 :E 5 |
201 |
|
:F 7) |
202 |
|
ERROR |
203 |
|
|
204 |
|
((LAMBDA (X &ALLOW-OTHER-KEYS) (LIST X Y)) 2 :Y 3) |
205 |
|
ERROR |
206 |
|
|
207 |
|
((LAMBDA)) |
208 |
|
ERROR |
209 |
|
|