86 |
y) |
y) |
87 |
"edcba") |
"edcba") |
88 |
|
|
89 |
(deftest nreverse-error.1 |
(deftest nreverse.error.1 |
90 |
(catch-type-error (nreverse 'a)) |
(catch-type-error (nreverse 'a)) |
91 |
type-error) |
type-error) |
92 |
|
|
93 |
(deftest nreverse-error.2 |
(deftest nreverse.error.2 |
94 |
(catch-type-error (nreverse #\a)) |
(catch-type-error (nreverse #\a)) |
95 |
type-error) |
type-error) |
96 |
|
|
97 |
(deftest nreverse-error.3 |
(deftest nreverse.error.3 |
98 |
(catch-type-error (nreverse 10)) |
(catch-type-error (nreverse 10)) |
99 |
type-error) |
type-error) |
100 |
|
|
101 |
(deftest nreverse-error.4 |
(deftest nreverse.error.4 |
102 |
(catch-type-error (nreverse 0.3)) |
(catch-type-error (nreverse 0.3)) |
103 |
type-error) |
type-error) |
104 |
|
|
105 |
(deftest nreverse-error.5 |
(deftest nreverse.error.5 |
106 |
(catch-type-error (nreverse 10/3)) |
(catch-type-error (nreverse 10/3)) |
107 |
type-error) |
type-error) |
108 |
|
|
109 |
|
(deftest nreverse.error.6 |
110 |
|
(classify-error (nreverse)) |
111 |
|
program-error) |
112 |
|
|
113 |
|
(deftest nreverse.error.7 |
114 |
|
(classify-error (nreverse nil nil)) |
115 |
|
program-error) |
116 |
|
|
117 |
|
|
118 |
|
|