projects
/
gcc.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Load new scanlang.exp
[gcc.git]
/
libgomp
/
testsuite
/
libgomp.c
/
pr32468.c
1
/* PR libgomp/32468 */
2
/* { dg-do run } */
3
4
#include <omp.h>
5
#include <stdlib.h>
6
7
int
8
main
(
void
)
9
{
10
int
res
[
2
] = { -
1
, -
1
};
11
omp_set_dynamic
(
0
);
12
omp_set_num_threads
(
4
);
13
#pragma omp parallel
14
{
15
#pragma omp sections
16
{
17
#pragma omp section
18
res
[
0
] =
omp_get_num_threads
() !=
4
;
19
#pragma omp section
20
res
[
1
] =
omp_get_num_threads
() !=
4
;
21
}
22
}
23
if
(
res
[
0
] !=
0
||
res
[
1
] !=
0
)
24
abort
();
25
return
0
;
26
}