libgomp/testsuite/libgomp.c/nestedfn-6.c

   1 extern void abort (void);
   2
   3 int j;
   4
   5 int
   6 main (void)
   7 {
   8   int i;
   9   void nested (void) { i = 0; }
  10 #pragma omp parallel for lastprivate (i)
  11   for (i = 0; i < 50; i += 3)
  12     ;
  13   if (i != 51)
  14     abort ();
  15 #pragma omp parallel for lastprivate (j)
  16   for (j = -50; j < 70; j += 7)
  17     ;
  18   if (j != 76)
  19     abort ();
  20   return 0;
  21 }