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

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

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

revision 1.11 by pfdietz, Thu Sep 23 13:28:54 2004 UTC revision 1.12 by pfdietz, Fri May 6 13:34:42 2005 UTC
# Line 1024  Line 1024 
1024    (signals-error (nsubstitute 'a 'b (list 'a 'b 'c) :key #'car) type-error)    (signals-error (nsubstitute 'a 'b (list 'a 'b 'c) :key #'car) type-error)
1025    t)    t)
1026    
1027    (deftest nsubstitute.error.12
1028      (check-type-error #'(lambda (x) (nsubstitute 1 0 x)) #'sequencep)
1029      nil)

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

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