URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [g++.dg/] [gomp/] [sharing-2.C] - Rev 774
Go to most recent revision | Compare with Previous | Blame | View Log
// { dg-do compile }
struct T
{
int i;
mutable int j;
};
struct S
{
const static int d = 1;
const static T e;
void foo (int, T);
};
const int S::d;
const T S::e = { 2, 3 };
void bar (const int &);
void
S::foo (const int x, const T y)
{
#pragma omp parallel firstprivate (x)
bar (x);
#pragma omp parallel firstprivate (d)
bar (d);
#pragma omp parallel firstprivate (y)
bar (y.i);
#pragma omp parallel firstprivate (e) // { dg-error "is predetermined" }
bar (e.i);
#pragma omp parallel shared (x) // { dg-error "is predetermined" }
bar (x);
#pragma omp parallel shared (d) // { dg-error "is predetermined" }
bar (d);
#pragma omp parallel shared (e) // { dg-error "is predetermined" }
bar (e.i);
#pragma omp parallel shared (y)
bar (y.i);
#pragma omp parallel private (x) // { dg-error "is predetermined" }
bar (x);
#pragma omp parallel private (d) // { dg-error "is predetermined" }
bar (d);
#pragma omp parallel private (y)
bar (y.i);
#pragma omp parallel private (e) // { dg-error "is predetermined" }
bar (e.i);
}
Go to most recent revision | Compare with Previous | Blame | View Log