(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.dg/
gomp/
block-1.c
       1  // { dg-do compile }
       2  
       3  void foo()
       4  {
       5    bad1:
       6    #pragma omp parallel
       7      goto bad1; // { dg-error "invalid branch to/from OpenMP structured block" }
       8  
       9    goto bad2; // { dg-error "invalid entry to OpenMP structured block" }
      10    #pragma omp parallel
      11      {
      12        bad2: ;
      13      }
      14  
      15    #pragma omp parallel
      16      {
      17        int i;
      18        goto ok1;
      19        for (i = 0; i < 10; ++i)
      20  	{ ok1: break; }
      21      }
      22  }