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

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

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

revision 1.9 by pfdietz, Thu Feb 20 23:57:54 2003 UTC revision 1.10 by pfdietz, Sat Feb 22 01:15:59 2003 UTC
# Line 697  Line 697 
697  (deftest mismatch.error.6  (deftest mismatch.error.6
698    (classify-error (mismatch nil nil 1 2))    (classify-error (mismatch nil nil 1 2))
699    program-error)    program-error)
700    
701    (deftest mismatch.error.7
702      (classify-error (mismatch '(a b) '(a b) :test #'identity))
703      program-error)
704    
705    (deftest mismatch.error.8
706      (classify-error (mismatch '(a b) '(a b) :test-not #'identity))
707      program-error)
708    
709    (deftest mismatch.error.9
710      (classify-error (mismatch '(a b) '(a b) :key #'car))
711      type-error)
712    
713    (deftest mismatch.error.10
714      (classify-error (mismatch '(a b) '(a b) :key #'cons))
715      program-error)

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

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