79 |
program-error) |
program-error) |
80 |
|
|
81 |
(deftest get-properties.error.4 |
(deftest get-properties.error.4 |
82 |
(classify-error (get-properties '(a 1 b 2 c 3) '(a . b))) |
(classify-error (get-properties '(a 1 b 2 c 3) '(x . y))) |
83 |
type-error) |
type-error) |
84 |
|
|
85 |
(deftest get-properties.error.5 |
(deftest get-properties.error.5 |
86 |
(classify-error (get-properties '(a 1 b 2 c 3 . d) '(a z))) |
(classify-error (get-properties '(a 1 b 2 c 3 . d) '(x y))) |
87 |
type-error) |
type-error) |
88 |
|
|
89 |
(deftest get-properties.error.6 |
(deftest get-properties.error.6 |
90 |
(classify-error (get-properties '(a 1 b 2 c . d) '(a z))) |
(classify-error (get-properties '(a 1 b 2 c . d) '(x y))) |
91 |
type-error) |
type-error) |
92 |
|
|
93 |
|
|