77 |
t) |
t) |
78 |
|
|
79 |
(deftest set-exclusive-or-6 |
(deftest set-exclusive-or-6 |
80 |
(handler-case |
(set-exclusive-or-with-check '(a b c d e) '(d a b e) |
81 |
(set-exclusive-or-with-check '(a b c d e) '(d a b e) |
:key nil) |
|
:key nil) |
|
|
(error (c) c)) |
|
82 |
(c)) |
(c)) |
83 |
|
|
84 |
(deftest set-exclusive-or-7 |
(deftest set-exclusive-or-7 |
263 |
t) |
t) |
264 |
|
|
265 |
(deftest nset-exclusive-or-6 |
(deftest nset-exclusive-or-6 |
266 |
(handler-case |
(nset-exclusive-or-with-check '(a b c d e) '(d a b e) |
267 |
(nset-exclusive-or-with-check '(a b c d e) '(d a b e) |
:key nil) |
|
:key nil) |
|
|
(error (c) c)) |
|
268 |
(c)) |
(c)) |
269 |
|
|
270 |
(deftest nset-exclusive-or-7 |
(deftest nset-exclusive-or-7 |