[Dotgnu-pnet-commits] CVS: pnet/engine lib_array.c,1.23,1.24

[Rhys Weatherley <address@hidden>]

Update of /cvsroot/dotgnu-pnet/pnet/engine
In directory subversions:/tmp/cvs-serv18113/engine

Modified Files:
        lib_array.c 
Log Message:


_IL_Array_CreateArray_jaiai: set the correct bounds values in the array
type for multi-dimensional arrays with specified lower bounds.


Index: lib_array.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/engine/lib_array.c,v
retrieving revision 1.23
retrieving revision 1.24
diff -C2 -r1.23 -r1.24
*** lib_array.c 13 Apr 2003 11:05:03 -0000      1.23
--- lib_array.c 14 Apr 2003 02:03:29 -0000      1.24
***************
*** 2621,2624 ****
--- 2621,2636 ----
                return 0;
        }
+       if(lowerBounds)
+       {
+               for(dim = 0; dim < rank; ++dim)
+               {
+                       ILTypeSetLowBound
+                               (type, (unsigned long)(long)dim,
+                                (long)((ILInt32 
*)ArrayToBuffer(lowerBounds))[dim]);
+                       ILTypeSetSize
+                               (type, (unsigned long)(long)dim,
+                                (long)((ILInt32 
*)ArrayToBuffer(lengths))[dim]);
+               }
+       }
        classInfo = ILClassFromType(ILProgramItem_Image(thread->method),
                                                                0, type, 0);