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
   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 // { dg-error "work-sharing region may not be closely nested inside of work-sharing, critical, ordered, master or explicit task region" }
  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 }