1  /* { dg-do compile } */
       2  
       3  void
       4  a20_wrong ()
       5  {
       6    int a = 1;
       7  #pragma omp parallel
       8    {
       9      if (a != 0)
      10  #pragma omp flush(a)	/* { dg-error "'#pragma omp flush' may only" } */
      11  /* incorrect as flush cannot be immediate substatement
      12      of if statement */
      13        if (a != 0)
      14  #pragma omp barrier	/* { dg-error "'#pragma omp barrier' may only" } */
      15  /* incorrect as barrier cannot be immediate substatement
      16      of if statement */
      17    }
      18  }