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

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

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

revision 1.4 by pfdietz, Wed May 7 13:11:55 2003 UTC revision 1.5 by pfdietz, Thu May 8 11:31:44 2003 UTC
# Line 99  Line 99 
99    1 1)    1 1)
100    
101  (deftest the.14  (deftest the.14
102    (the (values &rest (cons t (cons t null))) (values 'a 'b))    (the (values &rest t) (values 'a 'b))
103    a b)    a b)
104    
105  (deftest the.15  (deftest the.15
106    (the (values &rest (cons symbol (cons symbol null))) (values 'a 'b))    (the (values &rest symbol) (values 'a 'b))
107    a b)    a b)
108    
109  (deftest the.16  (deftest the.16
110    (the (values &rest null) (values)))    (the (values &rest null) (values)))
111    
112    (deftest the.17
113      (the (values symbol integer &rest null) (values 'a 1))
114      a 1)
115    
116    (deftest the.18
117      (the (values symbol integer &rest t) (values 'a 1 'foo '(x y)))
118      a 1 foo (x y))

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

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