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

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

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

revision 1.6 by pfdietz, Sat Feb 15 05:11:12 2003 UTC revision 1.7 by pfdietz, Sat Feb 22 01:15:59 2003 UTC
# Line 135  Line 135 
135  (deftest some.error.10  (deftest some.error.10
136    (classify-error (locally (some 1 '(a b c)) t))    (classify-error (locally (some 1 '(a b c)) t))
137    type-error)    type-error)
138    
139    (deftest some.error.11
140      (classify-error (some #'cons '(a b c)))
141      program-error)
142    
143    (deftest some.error.12
144      (classify-error (some #'car '(a b c)))
145      type-error)
146    
147    (deftest some.error.13
148      (classify-error (some #'cons '(a b c) '(b c d) '(c d e)))
149      program-error)
150    
151    

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7

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