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
2010-04-13 Richard Guenther <rguenther@suse.de>
[pf3gnuchains/gcc-fork.git]
/
libgomp
/
testsuite
/
libgomp.c
/
pr26943-1.c
1
/* PR c++/26943 */
2
/* { dg-do run } */
3
4
extern void abort (void);
5
extern void omp_set_dynamic (int);
6
int n = 6;
7
8
int
9
main (void)
10
{
11
int i, x = 0;
12
omp_set_dynamic (0);
13
#pragma omp parallel for num_threads (16) firstprivate (n) lastprivate (n) \
14
schedule (static, 1) reduction (+: x)
15
for (i = 0; i < 16; i++)
16
{
17
if (n != 6)
18
++x;
19
n = i;
20
}
21
if (x || n != 15)
22
abort ();
23
return 0;
24
}