libgomp/testsuite/libgomp.c/pr90779.c

   1 /* PR middle-end/90779 */
   2
   3 extern void abort (void);
   4
   5 int
   6 main ()
   7 {
   8   int i, j;
   9   for (i = 0; i < 2; ++i)
  10     #pragma omp target map(from: j)
  11     {
  12       static int k = 5;
  13       j = ++k;
  14     }
  15   if (j != 7)
  16     abort ();
  17   return 0;
  18 }