Parent Directory | Revision Log | Patch
revision 1.1 by pfdietz, Mon Nov 25 13:06:25 2002 UTC | revision 1.2 by pfdietz, Mon Jan 13 14:11:49 2003 UTC | |
---|---|---|
# | Line 31 | Line 31 |
31 | (funcall #'eval 1) | (funcall #'eval 1) |
32 | 1) | 1) |
33 | ||
34 | ;;; Many more tests will go here? | ;;; Error cases |
35 | ||
36 | (deftest eval.error.1 | |
37 | (classify-error (eval)) | |
38 | program-error) | |
39 | ||
40 | (deftest eval.error.2 | |
41 | (classify-error (eval nil nil)) | |
42 | program-error) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |