aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.dg/gomp/block-7.c
blob: 3e8746406be028cb35a9cbe418f9fd9b21915719 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
// { dg-do compile }

void foo()
{
  int i, j;
  for (i = 0; i < 10; ++i)
    {
      #pragma omp for
      for (j = ({ continue; 0; }); // { dg-error "invalid exit from OpenMP structured block" }
	   j < ({ continue; 10; }); // { dg-error "invalid exit from OpenMP structured block" }
	   j += ({ continue; 1; })) // { dg-error "invalid exit from OpenMP structured block" }
	continue;

      #pragma omp for
      for (j = ({ break; 0; }); // { dg-error "invalid exit from OpenMP structured block" }
	   j < ({ break; 10; }); // { dg-error "invalid exit from OpenMP structured block" }
	   j += ({ break; 1; })) // { dg-error "invalid exit from OpenMP structured block" }
	break;				// { dg-error "break" }
    }
}