Parent Directory | Revision Log | Patch
revision 1.2 by pfdietz, Sat Oct 12 18:44:42 2002 UTC | revision 1.3 by pfdietz, Mon Feb 17 13:25:22 2003 UTC | |
---|---|---|
# | Line 63 | Line 63 |
63 | (block done (mapcar #'%f '(good bad bad)))) | (block done (mapcar #'%f '(good bad bad)))) |
64 | 'bad) | 'bad) |
65 | good) | good) |
66 | ||
67 | #| | |
68 | (deftest return.error.1 | |
69 | (classify-error | |
70 | (block nil | |
71 | (return 'a 'b))) | |
72 | program-error) | |
73 | |# |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |