PR libfortran/64770 Segfault when trying to open existing file with status="new".
[official-gcc.git] / gcc / testsuite / gcc.dg / graphite / isl-ast-gen-if-2.c
blob90111e70a1a3251f0c5f81b75cce00b6951991aa
1 /* { dg-do run } */
2 /* { dg-options "-O2 -fgraphite-identity" } */
4 /* This test case tests reduction, where the pbbs are duplicated. */
6 static int __attribute__((noinline))
7 foo ()
9 int i, res = 0;
11 for (i = 0; i < 50; i++)
13 if (i >= 25)
14 res += i;
17 return res;
20 extern void abort ();
22 int
23 main (void)
25 int res = foo ();
27 if (res != 925)
28 abort ();
30 return 0;