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

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

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

revision 1.1 by pfdietz, Sun Apr 20 13:17:45 2003 UTC revision 1.2 by pfdietz, Sat Aug 2 18:35:19 2003 UTC
# Line 138  Line 138 
138  (deftest assoc-if.error.11  (deftest assoc-if.error.11
139    (classify-error (assoc-if #'null '((a . b) . c)))    (classify-error (assoc-if #'null '((a . b) . c)))
140    type-error)    type-error)
141    
142    (deftest assoc-if.error.12
143      (classify-error (assoc-if #'null ((a . b) :bad (c . d))))
144      type-error)
145    
146    (deftest assoc-if.error.13
147      (classify-error (assoc-if #'null 'y))
148      type-error)

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

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