225 |
(classify-error (locally (member-if #'identity 'a) t)) |
(classify-error (locally (member-if #'identity 'a) t)) |
226 |
type-error) |
type-error) |
227 |
|
|
228 |
|
(deftest member-if.error.9 |
229 |
|
(classify-error (member-if #'cons '(a b c))) |
230 |
|
program-error) |
231 |
|
|
232 |
|
(deftest member-if.error.10 |
233 |
|
(classify-error (member-if #'identity '(a b c) :key #'cons)) |
234 |
|
program-error) |
235 |
|
|
236 |
|
|
237 |
(deftest member-if-not.error.1 |
(deftest member-if-not.error.1 |
238 |
(classify-error (member-if-not #'identity 'a)) |
(classify-error (member-if-not #'identity 'a)) |
265 |
(deftest member-if-not.error.8 |
(deftest member-if-not.error.8 |
266 |
(classify-error (locally (member-if-not #'identity 'a) t)) |
(classify-error (locally (member-if-not #'identity 'a) t)) |
267 |
type-error) |
type-error) |
268 |
|
|
269 |
|
(deftest member-if-not.error.9 |
270 |
|
(classify-error (member-if-not #'cons '(a b c))) |
271 |
|
program-error) |
272 |
|
|
273 |
|
(deftest member-if-not.error.10 |
274 |
|
(classify-error (member-if-not #'identity '(a b c) :key #'cons)) |
275 |
|
program-error) |