gcc/testsuite/gcc.dg/gomp/block-2.c

   1 // { dg-do compile }
   2
   3 void foo()
   4 {
   5   int i, j;
   6
   7   #pragma omp for
   8   for (i = 0; i < 10; ++i)
   9     break;                      // { dg-error "break" }
  10
  11   bad1:
  12   #pragma omp for
  13   for (i = 0; i < 10; ++i)
  14     goto bad1; // { dg-error "invalid branch to/from OpenMP structured block" }
  15
  16   goto bad2; // { dg-error "invalid entry to OpenMP structured block" }
  17   #pragma omp for
  18   for (i = 0; i < 10; ++i)
  19     {
  20       bad2: ;
  21     }
  22
  23   #pragma omp for
  24   for (i = 0; i < 10; ++i)
  25     for (j = 0; j < 10; ++j)
  26       if (i == j)
  27         break;
  28
  29   #pragma omp for
  30   for (i = 0; i < 10; ++i)
  31     continue;
  32 }