mirror of
https://github.com/Gericom/teak-llvm.git
synced 2025-06-30 08:49:04 -04:00

This patch generates some helper variables which used as a private copies of the corresponding original variables inside an OpenMP 'parallel' directive. These generated variables are initialized by default (with the default constructor, if any). In outlined function references to original variables are replaced by the references to these private helper variables. At the end of the initialization of the private variables and implicit barier is set by calling __kmpc_barrier(...) runtime function to be sure that all threads were initialized using original values of the variables. Differential Revision: http://reviews.llvm.org/D4752 llvm-svn: 220262
205 lines
5.0 KiB
C++
205 lines
5.0 KiB
C++
// RUN: %clang_cc1 -verify -fopenmp=libiomp5 %s
|
|
|
|
void foo() {
|
|
}
|
|
|
|
bool foobool(int argc) {
|
|
return argc;
|
|
}
|
|
|
|
struct S1; // expected-note 2 {{declared here}} expected-note 2 {{forward declaration of 'S1'}}
|
|
extern S1 a;
|
|
class S2 {
|
|
mutable int a;
|
|
|
|
public:
|
|
S2() : a(0) {}
|
|
};
|
|
const S2 b;
|
|
const S2 ba[5];
|
|
class S3 {
|
|
int a;
|
|
|
|
public:
|
|
S3() : a(0) {}
|
|
};
|
|
const S3 ca[5];
|
|
class S4 {
|
|
int a;
|
|
S4(); // expected-note {{implicitly declared private here}}
|
|
|
|
public:
|
|
S4(int v) : a(v) {}
|
|
};
|
|
class S5 {
|
|
int a;
|
|
S5() : a(0) {} // expected-note {{implicitly declared private here}}
|
|
|
|
public:
|
|
S5(int v) : a(v) {}
|
|
};
|
|
|
|
S3 h;
|
|
#pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}}
|
|
|
|
template <class I, class C>
|
|
int foomain(I argc, C **argv) {
|
|
I e(4);
|
|
I g(5);
|
|
int i;
|
|
int &j = i; // expected-note {{'j' defined here}}
|
|
#pragma omp parallel sections private // expected-error {{expected '(' after 'private'}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private() // expected-error {{expected expression}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(argc)
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(S1) // expected-error {{'S1' does not refer to a value}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(a, b) // expected-error {{private variable with incomplete type 'S1'}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(argv[1]) // expected-error {{expected variable name}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(e, g)
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(h) // expected-error {{threadprivate or thread local variable cannot be private}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections copyprivate(h) // expected-error {{unexpected OpenMP clause 'copyprivate' in directive '#pragma omp parallel sections'}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel
|
|
{
|
|
int v = 0;
|
|
int i;
|
|
#pragma omp parallel sections private(i)
|
|
{
|
|
foo();
|
|
}
|
|
v += i;
|
|
}
|
|
#pragma omp parallel shared(i)
|
|
#pragma omp parallel private(i)
|
|
#pragma omp parallel sections private(j) // expected-error {{arguments of OpenMP clause 'private' cannot be of reference type}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(i)
|
|
{
|
|
foo();
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int main(int argc, char **argv) {
|
|
S4 e(4);
|
|
S5 g(5);
|
|
int i;
|
|
int &j = i; // expected-note {{'j' defined here}}
|
|
#pragma omp parallel sections private // expected-error {{expected '(' after 'private'}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private() // expected-error {{expected expression}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(argc)
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(S1) // expected-error {{'S1' does not refer to a value}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(a, b) // expected-error {{private variable with incomplete type 'S1'}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(argv[1]) // expected-error {{expected variable name}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(h) // expected-error {{threadprivate or thread local variable cannot be private}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections copyprivate(h) // expected-error {{unexpected OpenMP clause 'copyprivate' in directive '#pragma omp parallel sections'}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel
|
|
{
|
|
int i;
|
|
#pragma omp parallel sections private(i)
|
|
{
|
|
foo();
|
|
}
|
|
}
|
|
#pragma omp parallel shared(i)
|
|
#pragma omp parallel private(i)
|
|
#pragma omp parallel sections private(j) // expected-error {{arguments of OpenMP clause 'private' cannot be of reference type}}
|
|
{
|
|
foo();
|
|
}
|
|
#pragma omp parallel sections private(i)
|
|
{
|
|
foo();
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|