OSDN Git Service

Backported from mainline
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.dg / gomp / block-7.c
1 // { dg-do compile }
2
3 void foo()
4 {
5   int i, j;
6   for (i = 0; i < 10; ++i)
7     {
8       #pragma omp for
9       for (j = ({ continue; 0; });      // { dg-error "invalid branch" }
10            j < ({ continue; 10; });     // { dg-error "invalid branch" }
11            j += ({ continue; 1; }))     // { dg-error "invalid branch" }
12         continue;
13
14       #pragma omp for
15       for (j = ({ break; 0; });         // { dg-error "invalid branch" }
16            j < ({ break; 10; });        // { dg-error "invalid branch" }
17            j += ({ break; 1; }))        // { dg-error "invalid branch" }
18         break;                          // { dg-error "break" }
19     }
20 }