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

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

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by pfdietz, Sun Feb 16 05:39:55 2003 UTC revision 1.3 by pfdietz, Sun Apr 20 22:59:25 2003 UTC
# Line 55  Line 55 
55       i a b c d))       i a b c d))
56    4 4 1 2 3 4)    4 4 1 2 3 4)
57    
58    (deftest and.error.1
59      (classify-error (funcall (macro-function 'and)))
60      program-error)
61    
62    (deftest and.error.2
63      (classify-error (funcall (macro-function 'and)
64                               '(and)))
65      program-error)
66    
67    (deftest and.error.3
68      (classify-error (funcall (macro-function 'and)
69                               '(and) nil nil))
70      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