/[gcl]/gcl/ansi-tests/multiple-value-setq.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/multiple-value-setq.lsp

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

revision 1.2 by pfdietz, Sat Oct 19 13:10:23 2002 UTC revision 1.3 by camm, Sat Oct 26 16:18:13 2002 UTC
# Line 87  Line 87 
87      (values x y z))      (values x y z))
88    nil nil nil)    nil nil nil)
89    
90  #|  
91  (deftest multiple-value-setq.12  (deftest multiple-value-setq.12
92    (let ((n (min 100 multiple-values-limit))    (let ((n (min 100 multiple-values-limit))
93          (vars nil)          (vars nil)
# Line 106  Line 106 
106       unless (eval form)       unless (eval form)
107       collect (list i form)))       collect (list i form)))
108    nil)    nil)
109  |#  

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

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