1 /* { dg-do run } */
2 /* { dg-skip-if "Too much RAM needed" { "avr-*-*" } } */
3 
4 int result[64][16];
5 
main()6 int main()
7 {
8   double dbuf[1000] = {0.0};
9   int ibuf[900];
10   int i, j;
11 
12   double d1 = 0.0;
13   double d2 = 0.0;
14   for (i = 0; i < 900; ++i) {
15       ibuf[i] = (int)(d2 - d1);
16       d1 += dbuf[i];
17       d2 += dbuf[i + 64];
18   }
19 
20   for (i = 0; i < 64; ++i) {
21       for (j = 0; j < 8; ++j) {
22 	  result[i][     j] = ibuf[64 - i + 64 * j];
23 	  result[i][15 - j] = ibuf[     i + 64 * j];
24       }
25   }
26 
27   return 0;
28 }
29