/[gcl]/gcl/ansi-tests/count-if.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/count-if.lsp

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

revision 1.10 by pfdietz, Mon Feb 17 04:22:04 2003 UTC revision 1.11 by pfdietz, Sat Feb 22 01:15:59 2003 UTC
# Line 521  Line 521 
521  (deftest count-if.error.11  (deftest count-if.error.11
522    (classify-error (locally (count-if #'identity 1) t))    (classify-error (locally (count-if #'identity 1) t))
523    type-error)    type-error)
524    
525    (deftest count-if.error.12
526      (classify-error (count-if #'cons '(a b c)))
527      program-error)
528    
529    (deftest count-if.error.13
530      (classify-error (count-if #'car '(a b c)))
531      type-error)
532    
533    (deftest count-if.error.14
534      (classify-error (count-if #'identity '(a b c) :key #'cdr))
535      type-error)
536    
537    (deftest count-if.error.15
538      (classify-error (count-if #'identity '(a b c) :key #'cons))
539      program-error)
540    
541    

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11

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