uffi/tests arrays.lisp,1.3,1.4

Update of /pubcvs/uffi/tests
In directory boa.b9.com:/tmp/cvs-serv19459/tests

Modified Files:
	arrays.lisp 
Log Message:
Auto commit for Debian build

Index: arrays.lisp
===================================================================
RCS file: /pubcvs/uffi/tests/arrays.lisp,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** arrays.lisp	30 Apr 2003 13:48:34 -0000	1.3
--- arrays.lisp	1 May 2003 04:59:37 -0000	1.4
***************
*** 32,36 ****
  	(push (uffi:deref-array a '(:array :long) i) results))
        (uffi:free-foreign-object a)
!       results)
    (0 1 4 9 16 25 36 49 64 81))
  
--- 32,36 ----
  	(push (uffi:deref-array a '(:array :long) i) results))
        (uffi:free-foreign-object a)
!       (nreverse results))
    (0 1 4 9 16 25 36 49 64 81))
  
***************
*** 55,59 ****
  	    (push (uffi:deref-array col '(:array :long) c) results))))
        (uffi:free-foreign-object a)
!       results)
    (0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99))
  
--- 55,59 ----
  	    (push (uffi:deref-array col '(:array :long) c) results))))
        (uffi:free-foreign-object a)
!       (nreverse results))
    (0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99))