libgomp/testsuite/libgomp.c/pr49898-2.c

   1 /* PR middle-end/49898 */
   2 /* { dg-do run } */
   3
   4 extern void abort (void);
   5
   6 int
   7 main ()
   8 {
   9   int i, j, sum = 0;
  10 #pragma omp parallel for reduction(+:sum)
  11   for (i = 0; i < 10; i++)
  12     #pragma omp parallel for reduction(+:sum)
  13     for (j = 0; j < 10; j++)
  14       sum += j;
  15   if (sum != 450)
  16     abort ();
  17   return 0;
  18 }