/[gcl]/gcl/ansi-tests/cond.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/cond.lsp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch 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)

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26