rt_gccstream/gcc/testsuite/gcc.dg/graphite/interchange-9.c

49 lines
687 B
C

/* { dg-require-effective-target size32plus } */
#define DEBUG 0
#if DEBUG
#include <stdio.h>
#endif
#define N 1111
#define M 1111
static int __attribute__((noinline))
foo (int *x)
{
int i, j;
int sum = 0;
for (j = 0; j < M; ++j)
for (i = 0; i < N; ++i)
sum += x[M * i + j];
return sum;
}
extern void abort ();
int
main (void)
{
int A[N*M];
int i, res;
for (i = 0; i < N*M; i++)
A[i] = 2;
res = foo (A);
#if DEBUG
fprintf (stderr, "res = %d \n", res);
#endif
if (res != 2468642)
abort ();
return 0;
}
/* { dg-final { scan-tree-dump-times "will be interchanged" 1 "graphite" } } */
/* { dg-final { cleanup-tree-dump "graphite" } } */