mirror of
https://review.haiku-os.org/buildtools
synced 2025-02-12 08:47:41 +01:00
5904152eeb
git-svn-id: file:///srv/svn/repos/haiku/buildtools/trunk@37371 a95241bf-73f2-0310-859d-f6bbb57e9c96
31 lines
585 B
C
31 lines
585 B
C
extern void abort (void);
|
|
|
|
int i = 8;
|
|
|
|
int main (void)
|
|
{
|
|
int j = 7, k = 0;
|
|
#pragma omp for
|
|
for (i = 0; i < 10; i++)
|
|
;
|
|
#pragma omp for
|
|
for (j = 0; j < 10; j++)
|
|
;
|
|
/* OpenMP 3.0 newly guarantees that the original list items can't
|
|
be shared with the privatized omp for iterators, even when
|
|
the original list items are already private. */
|
|
if (i != 8 || j != 7)
|
|
abort ();
|
|
#pragma omp parallel private (i) reduction (+:k)
|
|
{
|
|
i = 6;
|
|
#pragma omp for
|
|
for (i = 0; i < 10; i++)
|
|
;
|
|
k = (i != 6);
|
|
}
|
|
if (k)
|
|
abort ();
|
|
return 0;
|
|
}
|