libgomp/testsuite/libgomp.c/appendix-a/a.26.1.c

   1 /* { dg-do run } */
   2
   3 #include <stdio.h>
   4 int
   5 main ()
   6 {
   7   int i, j;
   8   i = 1;
   9   j = 2;
  10 #pragma omp parallel private(i) firstprivate(j)
  11   {
  12     i = 3;
  13     j = j + 2;
  14   }
  15   printf ("%d %d\n", i, j);     /* i and j are undefined */
  16   return 0;
  17 }