PR libfortran/64770 Segfault when trying to open existing file with status="new".
[official-gcc.git] / gcc / testsuite / gcc.dg / graphite / isl-ast-gen-blocks-3.c
blob771d337bdde350559bd34f55051dffadd92d05cf
1 /* { dg-do run } */
2 /* { dg-options "-O2 -fgraphite-identity" } */
4 /* We use a global variable 'k' to avoid ipa-cp. */
5 int k = 50;
6 static int __attribute__((noinline))
7 foo ()
9 int i, res = 0;
10 for (i = k/2; i < k; i++)
11 res += i;
13 return res;
16 extern void abort ();
18 int
19 main (void)
21 int res = foo ();
23 if (res != 925)
24 abort ();
26 return 0;