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
gcc/
[official-gcc.git]
/
libgomp
/
testsuite
/
libgomp.c
/
omp-single-3.c
blob
5a06532448eb90b21d7d30c81f406a8303fb54a5
1
extern
void
abort
(
void
);
2
3
void
4
single
(
int
a
,
int
b
)
5
{
6
#pragma omp single copyprivate(a) copyprivate(b)
7
{
8
a
=
b
=
5
;
9
}
10
11
if
(
a
!=
b
)
12
abort
();
13
}
14
15
int
main
()
16
{
17
#pragma omp parallel
18
single
(
1
,
2
);
19
20
return
0
;
21
}