Parent Directory | Revision Log | Patch
revision 1.2 by pfdietz, Sun Aug 31 09:28:56 2003 UTC | revision 1.3 by pfdietz, Sun Aug 31 15:35:20 2003 UTC | |
---|---|---|
# | Line 361 | Line 361 |
361 | collect (list i j x y (* cx cy)))) | collect (list i j x y (* cx cy)))) |
362 | nil) | nil) |
363 | ||
364 | (deftest times.order.1 | (deftest times.order.1 |
365 | (let ((i 0) x y) | (let ((i 0) x y) |
366 | (values | (values |
# | Line 378 | Line 377 |
377 | (progn (setf z (incf i)) 5)) | (progn (setf z (incf i)) 5)) |
378 | i x y z)) | i x y z)) |
379 | 30 3 1 2 3) | 30 3 1 2 3) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |