OSDN Git Service
(root)
/
pf3gnuchains
/
gcc-fork.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
PR tree-optimization/52019
[pf3gnuchains/gcc-fork.git]
/
gcc
/
testsuite
/
gcc.dg
/
gomp
/
block-3.c
1
// { dg-do compile }
2
3
extern int test(int);
4
void foo()
5
{
6
int i;
7
8
for (i = 0; i < 10; ++i)
9
{
10
#pragma omp sections
11
{
12
continue; // { dg-error "invalid branch" }
13
}
14
}
15
16
#pragma omp sections
17
{
18
#pragma omp section
19
{ bad1: ; }
20
#pragma omp section
21
goto bad1; // { dg-error "invalid branch" }
22
}
23
24
#pragma omp sections
25
{
26
goto bad2; // { dg-error "invalid branch" }
27
}
28
bad2:;
29
30
goto bad3; // { dg-error "invalid entry" }
31
#pragma omp sections
32
{
33
bad3: ;
34
}
35
36
#pragma omp sections
37
{
38
goto ok1;
39
ok1:;
40
41
#pragma omp section
42
for (i = 0; i < 10; ++i)
43
if (test(i))
44
break;
45
else
46
continue;
47
48
#pragma omp section
49
switch (i)
50
{
51
case 0:
52
break;
53
default:
54
test(i);
55
}
56
}
57
}