(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.dg/
gomp/
critical-4.c
       1  /* { dg-do compile } */
       2  
       3  extern void bar(int);
       4  
       5  void
       6  foo1 (void)
       7  {
       8    #pragma omp critical
       9    #pragma omp critical(foo)
      10    #pragma omp critical(bar)
      11      bar (0);
      12  }
      13  
      14  void
      15  foo2 (void)
      16  {
      17    #pragma omp critical
      18    #pragma omp critical		/* { dg-error "with the same name" } */
      19      bar (0);
      20  }
      21  
      22  void
      23  foo3 (void)
      24  {
      25    #pragma omp critical(foo)
      26    #pragma omp critical(foo)	/* { dg-error "with the same name" } */
      27      bar (0);
      28  }