(root)/
gcc-13.2.0/
gcc/
testsuite/
c-c++-common/
goacc/
sb-3.c
       1  // { dg-skip-if "not yet" { c++ } }
       2  
       3  void f (void)
       4  {
       5    int i, j;
       6  #pragma acc loop /* { dg-error "loop directive must be associated with an OpenACC compute region" } */
       7    for(i = 1; i < 30; i++)
       8      {
       9        if (i == 7) goto out; // { dg-error "invalid branch to/from OpenACC structured block" }
      10  #pragma acc loop
      11        for(j = 5; j < 10; j++)
      12  	{
      13  	  if (i == 6 && j == 7) goto out; // { dg-error "invalid branch to/from OpenACC structured block" }
      14  	}
      15      }
      16   out:
      17    ;
      18  }