Parent Directory | Revision Log | Patch
revision 1.2 by pfdietz, Tue Mar 4 14:14:31 2003 UTC | revision 1.3 by pfdietz, Sun Apr 20 22:59:25 2003 UTC | |
---|---|---|
# | Line 80 | Line 80 |
80 | 10 | 10 |
81 | (return-from done 'good))) | (return-from done 'good))) |
82 | good) | good) |
83 | ||
84 | (deftest cond.error.1 | |
85 | (classify-error (funcall (macro-function 'cond))) | |
86 | program-error) | |
87 | ||
88 | (deftest cond.error.2 | |
89 | (classify-error (funcall (macro-function 'cond) | |
90 | '(cond))) | |
91 | program-error) | |
92 | ||
93 | (deftest cond.error.3 | |
94 | (classify-error (funcall (macro-function 'cond) | |
95 | '(cond) nil nil)) | |
96 | program-error) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |