1799e5d5ca
From-SVN: r111867
22 lines
242 B
C
22 lines
242 B
C
extern "C" void abort (void);
|
|
|
|
void
|
|
single (int a, int b)
|
|
{
|
|
#pragma omp single copyprivate(a) copyprivate(b)
|
|
{
|
|
a = b = 5;
|
|
}
|
|
|
|
if (a != b)
|
|
abort ();
|
|
}
|
|
|
|
int main()
|
|
{
|
|
#pragma omp parallel
|
|
single (1, 2);
|
|
|
|
return 0;
|
|
}
|