repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Handle noexcept on transactions with -fno-exceptions
[official-gcc.git]
/
libgomp
/
testsuite
/
libgomp.c
/
pr34513.c
blob
76c7ac1f3a54c0833da1489964d0aecaef686506
1
/* PR c++/34513 */
2
/* { dg-do run } */
3
4
#include <omp.h>
5
6
extern
void
abort
();
7
8
static int
errors
=
0
;
9
static int
thrs
=
4
;
10
11
int
12
main
()
13
{
14
omp_set_dynamic
(
0
);
15
16
#pragma omp parallel num_threads (thrs)
17
{
18
static int
shrd
=
0
;
19
20
#pragma omp atomic
21
shrd
+=
1
;
22
23
#pragma omp barrier
24
25
if
(
shrd
!=
thrs
)
26
#pragma omp atomic
27
errors
+=
1
;
28
}
29
30
if
(
errors
)
31
abort
();
32
return
0
;
33
}