/[gcl]/gcl/ansi-tests/array-displacement.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/array-displacement.lsp

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

revision 1.3 by pfdietz, Fri Jan 24 02:12:45 2003 UTC revision 1.4 by pfdietz, Wed Jan 29 02:11:54 2003 UTC
# Line 113  Line 113 
113                                      `(array-displacement ',e)))))                                      `(array-displacement ',e)))))
114          collect (list e why)))          collect (list e why)))
115    nil)    nil)
116    
117    (deftest array-displacement.error.4
118      (classify-error (array-displacement nil))
119      type-error)
120    
121    (deftest array-displacement.error.5
122      (classify-error (let ((x nil)) (array-displacement x)))
123      type-error)
124    

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

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