libgomp/testsuite/libgomp.c++/pr38650.C

   1 // PR c++/38650
   2 // { dg-do run }
   3
   4 #include <cstdlib>
   5
   6 int e;
   7
   8 int
   9 main ()
  10 {
  11   volatile int i, j = 10;
  12   e = 0;
  13 #pragma omp parallel for reduction(+:e)
  14   for (i = 0; i < j; i += 1)
  15     e++;
  16   if (e != 10)
  17     std::abort ();
  18   e = 0;
  19 #pragma omp parallel for reduction(+:e)
  20   for (i = 0; i < j; ++i)
  21     e++;
  22   if (e != 10)
  23     std::abort ();
  24   e = 0;
  25 #pragma omp parallel for reduction(+:e)
  26   for (i = 0; i < j; i++)
  27     e++;
  28   if (e != 10)
  29     std::abort ();
  30   e = 0;
  31 #pragma omp parallel for reduction(+:e)
  32   for (i = 0; i < 10; i += 1)
  33     e++;
  34   if (e != 10)
  35     std::abort ();
  36   e = 0;
  37 #pragma omp parallel for reduction(+:e)
  38   for (i = 0; i < 10; ++i)
  39     e++;
  40   if (e != 10)
  41     std::abort ();
  42   e = 0;
  43 #pragma omp parallel for reduction(+:e)
  44   for (i = 0; i < 10; i++)
  45     e++;
  46   if (e != 10)
  47     std::abort ();
  48   return 0;
  49 }