fix tests

compiler/tests/success/arm-m4/array_access.jazz

@@ -0,0 +1,48 @@
+inline fn array_init () -> stack u32[5] {
+  stack u32[5] a;
+  reg u32 t;
+  inline int i;
+  for i = 0 to 5 {
+     t = i; a[i] = t;
+  }
+  return a;
+}
+
+export
+fn test_u16 () -> reg u32 {
+   stack u32[5] a;
+   reg ptr u32[5] pa;
+   a = array_init();
+   pa = a;
+   reg u32 i;
+   i = 0;
+
+   reg u32 t; 
+   t = 3;
+   pa[i] = t;
+   reg u32 r;
+   r = (32u) pa[u16 i];
+
+   return r;
+}
+
+fn test_u32 () -> reg u32 {
+   stack u32[5] a;
+   reg ptr u32[5] pa;
+   a = array_init();
+   pa = a;
+
+   reg u32 r;
+   r = 0;
+
+   reg u32 i;
+   i = 0;
+   reg u32 t;
+   while (i < 5) {
+     t = pa[i];
+     r = r + t;
+     i += 1;
+   }
+
+   return r;
+}

compiler/tests/success/common/array_access.jazz → compiler/tests/success/x86-64/array_access.jazz

@@ -1,20 +1,22 @@
 inline fn array_init () -> stack u32[5] {
-    stack u32[5] a;
-    for i = 0 to 5 {
-        a[i] = i;
-    }
+  stack u32[5] a;
+  inline int i;
+  for i = 0 to 5 {
+     a[i] = i;
+  }
+  return a;
 }
 
 export
 fn test_u16 () -> reg u16 {
    stack u32[5] a;
    a = array_init();
 
-   reg u16 i;
+   reg u64 i;
    i = 0;
    a[i] = 3;
    reg u16 r;
-   r = a[i];
+   r = a[u16 i];
 
    return r;
 }
@@ -26,7 +28,7 @@ fn test_u32 () -> reg u32 {
    reg u32 r;
    r = 0;
 
-   reg u32 i;
+   reg u64 i;
    i = 0;
    reg u32 t;
    while (i < 5) {