Parent Directory | Revision Log | Patch
revision 1.6 by pfdietz, Wed Nov 27 04:22:36 2002 UTC | revision 1.7 by pfdietz, Mon Jan 13 14:11:49 2003 UTC | |
---|---|---|
# | Line 312 | Line 312 |
312 | :fill-pointer 3))) | :fill-pointer 3))) |
313 | (elt a 4))) | (elt a 4))) |
314 | type-error) | type-error) |
315 | ||
316 | (deftest elt.error.1 | |
317 | (classify-error (elt)) | |
318 | program-error) | |
319 | ||
320 | (deftest elt.error.2 | |
321 | (classify-error (elt nil)) | |
322 | program-error) | |
323 | ||
324 | (deftest elt.error.3 | |
325 | (classify-error (elt nil 0 nil)) | |
326 | program-error) | |
327 | ||
328 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |