Parent Directory | Revision Log | Patch
revision 1.6 by pfdietz, Fri Feb 14 05:10:36 2003 UTC | revision 1.7 by pfdietz, Sat Feb 22 01:15:59 2003 UTC | |
---|---|---|
# | Line 128 | Line 128 |
128 | (deftest notany.error.10 | (deftest notany.error.10 |
129 | (classify-error (locally (notany 1 '(a b c)) t)) | (classify-error (locally (notany 1 '(a b c)) t)) |
130 | type-error) | type-error) |
131 | ||
132 | (deftest notany.error.11 | |
133 | (classify-error (notany #'cons '(a b c))) | |
134 | program-error) | |
135 | ||
136 | (deftest notany.error.12 | |
137 | (classify-error (notany #'cons '(a b c) '(1 2 4) '(g h j))) | |
138 | program-error) | |
139 | ||
140 | (deftest notany.error.13 | |
141 | (classify-error (notany #'car '(a b c))) | |
142 | type-error) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |