libgomp/testsuite/libgomp.c/single-2.c

   1 #include <stdlib.h>
   2
   3 int
   4 main (void)
   5 {
   6   int i;
   7   i = 4;
   8 #pragma omp single copyprivate (i)
   9   {
  10     i = 6;
  11   }
  12   if (i != 6)
  13     abort ();
  14   return 0;
  15 }