gcc/testsuite/gcc.dg/gomp/appendix-a/a.20.2.c

   1 /* { dg-do compile } */
   2
   3 void
   4 a20 ()
   5 {
   6   int a = 1;
   7 #pragma omp parallel
   8   {
   9     if (a != 0)
  10       {
  11 #pragma omp flush(a)
  12       }
  13     if (a != 0)
  14       {
  15 #pragma omp barrier
  16       }
  17   }
  18 }