170 |
(return-from fail 'failed)) |
(return-from fail 'failed)) |
171 |
t)))))) |
t)))))) |
172 |
t) |
t) |
173 |
|
|
174 |
|
(deftest set-exclusive-or.error.1 |
175 |
|
(classify-error (set-exclusive-or)) |
176 |
|
program-error) |
177 |
|
|
178 |
|
(deftest set-exclusive-or.error.2 |
179 |
|
(classify-error (set-exclusive-or nil)) |
180 |
|
program-error) |
181 |
|
|
182 |
|
(deftest set-exclusive-or.error.3 |
183 |
|
(classify-error (set-exclusive-or nil nil :bad t)) |
184 |
|
program-error) |
185 |
|
|
186 |
|
(deftest set-exclusive-or.error.4 |
187 |
|
(classify-error (set-exclusive-or nil nil :key)) |
188 |
|
program-error) |
189 |
|
|
190 |
|
(deftest set-exclusive-or.error.5 |
191 |
|
(classify-error (set-exclusive-or nil nil 1 2)) |
192 |
|
program-error) |
193 |
|
|
194 |
|
(deftest set-exclusive-or.error.6 |
195 |
|
(classify-error (set-exclusive-or nil nil :bad t :allow-other-keys nil)) |
196 |
|
program-error) |
197 |
|
|
198 |
|
|
199 |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
200 |
;;; nset-exclusive-or |
;;; nset-exclusive-or |
201 |
|
|
359 |
(return-from fail 'failed)) |
(return-from fail 'failed)) |
360 |
t)))))) |
t)))))) |
361 |
t) |
t) |
362 |
|
|
363 |
|
(deftest nset-exclusive-or.error.1 |
364 |
|
(classify-error (nset-exclusive-or)) |
365 |
|
program-error) |
366 |
|
|
367 |
|
(deftest nset-exclusive-or.error.2 |
368 |
|
(classify-error (nset-exclusive-or nil)) |
369 |
|
program-error) |
370 |
|
|
371 |
|
(deftest nset-exclusive-or.error.3 |
372 |
|
(classify-error (nset-exclusive-or nil nil :bad t)) |
373 |
|
program-error) |
374 |
|
|
375 |
|
(deftest nset-exclusive-or.error.4 |
376 |
|
(classify-error (nset-exclusive-or nil nil :key)) |
377 |
|
program-error) |
378 |
|
|
379 |
|
(deftest nset-exclusive-or.error.5 |
380 |
|
(classify-error (nset-exclusive-or nil nil 1 2)) |
381 |
|
program-error) |
382 |
|
|
383 |
|
(deftest nset-exclusive-or.error.6 |
384 |
|
(classify-error (nset-exclusive-or nil nil :bad t :allow-other-keys nil)) |
385 |
|
program-error) |