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

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

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

revision 1.2 by camm, Sat Oct 26 16:18:13 2002 UTC revision 1.3 by pfdietz, Fri Jan 24 04:22:54 2003 UTC
# Line 48  Line 48 
48    
49  (deftest multiple-value-prog1.8  (deftest multiple-value-prog1.8
50    (let* ((n (min 100 multiple-values-limit)))    (let* ((n (min 100 multiple-values-limit)))
51      (not      (not-mv
52       (loop for i from 0 below n       (loop for i from 0 below n
53             for x = (make-int-list i)             for x = (make-int-list i)
54             always             always

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