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

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

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

revision 1.3 by pfdietz, Fri Jan 24 13:55:10 2003 UTC revision 1.4 by pfdietz, Sat Jan 25 00:44:06 2003 UTC
# Line 93  Line 93 
93    
94  (deftest vector.type.23  (deftest vector.type.23
95    (notnot-mv (typep #(a b c) '(vector t *)))    (notnot-mv (typep #(a b c) '(vector t *)))
96    nil)    t)
97    
98  (deftest vector.type.23a  (deftest vector.type.23a
99    (notnot-mv (typep "abcde" '(vector * 5)))    (notnot-mv (typep "abcde" '(vector * 5)))

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