Parent Directory | Revision Log | Patch
revision 1.12 by pfdietz, Wed May 4 12:25:53 2005 UTC | revision 1.13 by pfdietz, Mon May 16 12:54:40 2005 UTC | |
---|---|---|
# | Line 180 | Line 180 |
180 | t) | t) |
181 | ||
182 | (deftest coerce.error.10 | (deftest coerce.error.10 |
183 | :notes (:result-type-element-type-by-subtype) | |
184 | (let* ((tp1 '(vector character)) | (let* ((tp1 '(vector character)) |
185 | (tp2 `(vector t)) | (tp2 `(vector t)) |
186 | (tp3 `(or ,tp1 ,tp2))) | (tp3 `(or ,tp1 ,tp2))) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |