9925f15661
[OpenMP] Initial implementation of parse and sema for composite pragma 'distribute parallel for' This patch is an initial implementation for #distribute parallel for. The main differences that affect other pragmas are: The implementation of 'distribute parallel for' requires blocking of the associated loop, where blocks are "distributed" to different teams and iterations within each block are scheduled to parallel threads within each team. To implement blocking, sema creates two additional worksharing directive fields that are used to pass the team assigned block lower and upper bounds through the outlined function resulting from 'parallel'. In this way, scheduling for 'for' to threads can use those bounds. As a consequence of blocking, the stride of 'distribute' is not 1 but it is equal to the blocking size. This is returned by the runtime and sema prepares a DistIncrExpr variable to hold that value. As a consequence of blocking, the global upper bound (EnsureUpperBound) expression of the 'for' is not the original loop upper bound (e.g. in for(i = 0 ; i < N; i++) this is 'N') but it is the team-assigned block upper bound. Sema creates a new expression holding the calculation of the actual upper bound for 'for' as UB = min(UB, PrevUB), where UB is the loop upper bound, and PrevUB is the team-assigned block upper bound. llvm-svn: 273884
442 lines
19 KiB
C++
442 lines
19 KiB
C++
// RUN: %clang_cc1 -verify -fopenmp -ferror-limit 150 -o - %s
|
|
// RUN: %clang_cc1 -verify -fopenmp -std=c++98 -ferror-limit 150 -o - %s
|
|
// RUN: %clang_cc1 -verify -fopenmp -std=c++11 -ferror-limit 150 -o - %s
|
|
|
|
void foo() {
|
|
}
|
|
|
|
bool foobool(int argc) {
|
|
return argc;
|
|
}
|
|
|
|
struct S1; // expected-note {{declared here}} expected-note 4 {{forward declaration of 'S1'}}
|
|
extern S1 a;
|
|
class S2 {
|
|
mutable int a;
|
|
S2 &operator+(const S2 &arg) { return (*this); } // expected-note 3 {{implicitly declared private here}}
|
|
|
|
public:
|
|
S2() : a(0) {}
|
|
S2(S2 &s2) : a(s2.a) {}
|
|
static float S2s; // expected-note 2 {{static data member is predetermined as shared}}
|
|
static const float S2sc;
|
|
};
|
|
const float S2::S2sc = 0; // expected-note 2 {{'S2sc' defined here}}
|
|
S2 b; // expected-note 3 {{'b' defined here}}
|
|
const S2 ba[5]; // expected-note 2 {{'ba' defined here}}
|
|
class S3 {
|
|
int a;
|
|
|
|
public:
|
|
int b;
|
|
S3() : a(0) {}
|
|
S3(const S3 &s3) : a(s3.a) {}
|
|
S3 operator+(const S3 &arg1) { return arg1; }
|
|
};
|
|
int operator+(const S3 &arg1, const S3 &arg2) { return 5; }
|
|
S3 c; // expected-note 3 {{'c' defined here}}
|
|
const S3 ca[5]; // expected-note 2 {{'ca' defined here}}
|
|
extern const int f; // expected-note 4 {{'f' declared here}}
|
|
class S4 {
|
|
int a;
|
|
S4(); // expected-note {{implicitly declared private here}}
|
|
S4(const S4 &s4);
|
|
S4 &operator+(const S4 &arg) { return (*this); }
|
|
|
|
public:
|
|
S4(int v) : a(v) {}
|
|
};
|
|
S4 &operator&=(S4 &arg1, S4 &arg2) { return arg1; }
|
|
class S5 {
|
|
int a;
|
|
S5() : a(0) {} // expected-note {{implicitly declared private here}}
|
|
S5(const S5 &s5) : a(s5.a) {}
|
|
S5 &operator+(const S5 &arg);
|
|
|
|
public:
|
|
S5(int v) : a(v) {}
|
|
};
|
|
class S6 { // expected-note 3 {{candidate function (the implicit copy assignment operator) not viable: no known conversion from 'int' to 'const S6' for 1st argument}}
|
|
#if __cplusplus >= 201103L // C++11 or later
|
|
// expected-note@-2 3 {{candidate function (the implicit move assignment operator) not viable}}
|
|
#endif
|
|
int a;
|
|
|
|
public:
|
|
S6() : a(6) {}
|
|
operator int() { return 6; }
|
|
} o;
|
|
|
|
S3 h, k;
|
|
#pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}}
|
|
|
|
template <class T> // expected-note {{declared here}}
|
|
T tmain(T argc) {
|
|
const T d = T(); // expected-note 4 {{'d' defined here}}
|
|
const T da[5] = {T()}; // expected-note 2 {{'da' defined here}}
|
|
T qa[5] = {T()};
|
|
T i;
|
|
T &j = i; // expected-note 4 {{'j' defined here}}
|
|
S3 &p = k; // expected-note 2 {{'p' defined here}}
|
|
const T &r = da[(int)i]; // expected-note 2 {{'r' defined here}}
|
|
T &q = qa[(int)i]; // expected-note 2 {{'q' defined here}}
|
|
T fl;
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction // expected-error {{expected '(' after 'reduction'}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction + // expected-error {{expected '(' after 'reduction'}} expected-warning {{extra tokens at the end of '#pragma omp distribute parallel for' are ignored}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction( // expected-error {{expected unqualified-id}} expected-warning {{missing ':' after reduction identifier - ignoring}} expected-error {{expected ')'}} expected-note {{to match this '('}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(- // expected-warning {{missing ':' after reduction identifier - ignoring}} expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction() // expected-error {{expected unqualified-id}} expected-warning {{missing ':' after reduction identifier - ignoring}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(*) // expected-warning {{missing ':' after reduction identifier - ignoring}} expected-error {{expected expression}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(\) // expected-error {{expected unqualified-id}} expected-warning {{missing ':' after reduction identifier - ignoring}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(& : argc // expected-error {{expected ')'}} expected-note {{to match this '('}} expected-error {{invalid operands to binary expression ('float' and 'float')}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(| : argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} expected-error {{invalid operands to binary expression ('float' and 'float')}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(|| : argc ? i : argc) // expected-error 2 {{expected variable name, array element or array section}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(foo : argc) //expected-error {{incorrect reduction identifier, expected one of '+', '-', '*', '&', '|', '^', '&&', '||', 'min' or 'max' or declare reduction for type 'float'}} expected-error {{incorrect reduction identifier, expected one of '+', '-', '*', '&', '|', '^', '&&', '||', 'min' or 'max' or declare reduction for type 'int'}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(&& : argc)
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(^ : T) // expected-error {{'T' does not refer to a value}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : a, b, c, d, f) // expected-error {{a reduction list item with incomplete type 'S1'}} expected-error 3 {{const-qualified list item cannot be reduction}} expected-error 2 {{'operator+' is a private member of 'S2'}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(min : a, b, c, d, f) // expected-error {{a reduction list item with incomplete type 'S1'}} expected-error 4 {{arguments of OpenMP clause 'reduction' for 'min' or 'max' must be of arithmetic type}} expected-error 3 {{const-qualified list item cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(max : h.b) // expected-error {{expected variable name, array element or array section}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : ba) // expected-error {{const-qualified list item cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(* : ca) // expected-error {{const-qualified list item cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(- : da) // expected-error {{const-qualified list item cannot be reduction}} expected-error {{const-qualified list item cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(^ : fl) // expected-error {{invalid operands to binary expression ('float' and 'float')}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(&& : S2::S2s) // expected-error {{shared variable cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(&& : S2::S2sc) // expected-error {{const-qualified list item cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : h, k) // expected-error {{threadprivate or thread local variable cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : o) // expected-error 2 {{no viable overloaded '='}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for private(i), reduction(+ : j), reduction(+ : q) // expected-error 4 {{argument of OpenMP clause 'reduction' must reference the same object in all threads}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp parallel private(k)
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : p), reduction(+ : p) // expected-error 2 {{argument of OpenMP clause 'reduction' must reference the same object in all threads}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : p), reduction(+ : p) // expected-error 2 {{variable can appear only once in OpenMP 'reduction' clause}} expected-note 2 {{previously referenced here}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : r) // expected-error 2 {{const-qualified list item cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp parallel shared(i)
|
|
#pragma omp parallel reduction(min : i)
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(max : j) // expected-error 2 {{argument of OpenMP clause 'reduction' must reference the same object in all threads}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp parallel private(fl)
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : fl)
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp parallel reduction(* : fl)
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : fl)
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
|
|
return T();
|
|
}
|
|
|
|
namespace A {
|
|
double x;
|
|
#pragma omp threadprivate(x) // expected-note {{defined as threadprivate or thread local}}
|
|
}
|
|
namespace B {
|
|
using A::x;
|
|
}
|
|
|
|
int main(int argc, char **argv) {
|
|
const int d = 5; // expected-note 2 {{'d' defined here}}
|
|
const int da[5] = {0}; // expected-note {{'da' defined here}}
|
|
int qa[5] = {0};
|
|
S4 e(4);
|
|
S5 g(5);
|
|
int i;
|
|
int &j = i; // expected-note 2 {{'j' defined here}}
|
|
S3 &p = k; // expected-note 2 {{'p' defined here}}
|
|
const int &r = da[i]; // expected-note {{'r' defined here}}
|
|
int &q = qa[i]; // expected-note {{'q' defined here}}
|
|
float fl;
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction // expected-error {{expected '(' after 'reduction'}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction + // expected-error {{expected '(' after 'reduction'}} expected-warning {{extra tokens at the end of '#pragma omp distribute parallel for' are ignored}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction( // expected-error {{expected unqualified-id}} expected-warning {{missing ':' after reduction identifier - ignoring}} expected-error {{expected ')'}} expected-note {{to match this '('}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(- // expected-warning {{missing ':' after reduction identifier - ignoring}} expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction() // expected-error {{expected unqualified-id}} expected-warning {{missing ':' after reduction identifier - ignoring}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(*) // expected-warning {{missing ':' after reduction identifier - ignoring}} expected-error {{expected expression}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(\) // expected-error {{expected unqualified-id}} expected-warning {{missing ':' after reduction identifier - ignoring}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(foo : argc // expected-error {{expected ')'}} expected-note {{to match this '('}} expected-error {{incorrect reduction identifier, expected one of '+', '-', '*', '&', '|', '^', '&&', '||', 'min' or 'max'}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(| : argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(|| : argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name, array element or array section}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(~ : argc) // expected-error {{expected unqualified-id}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(&& : argc)
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(^ : S1) // expected-error {{'S1' does not refer to a value}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : a, b, c, d, f) // expected-error {{a reduction list item with incomplete type 'S1'}} expected-error 2 {{const-qualified list item cannot be reduction}} expected-error {{'operator+' is a private member of 'S2'}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(min : a, b, c, d, f) // expected-error {{a reduction list item with incomplete type 'S1'}} expected-error 2 {{arguments of OpenMP clause 'reduction' for 'min' or 'max' must be of arithmetic type}} expected-error 2 {{const-qualified list item cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(max : h.b) // expected-error {{expected variable name, array element or array section}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : ba) // expected-error {{const-qualified list item cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(* : ca) // expected-error {{const-qualified list item cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(- : da) // expected-error {{const-qualified list item cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(^ : fl) // expected-error {{invalid operands to binary expression ('float' and 'float')}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(&& : S2::S2s) // expected-error {{shared variable cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(&& : S2::S2sc) // expected-error {{const-qualified list item cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(& : e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{invalid operands to binary expression ('S4' and 'S4')}} expected-error {{calling a private constructor of class 'S5'}} expected-error {{invalid operands to binary expression ('S5' and 'S5')}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : h, k, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : o) // expected-error {{no viable overloaded '='}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for private(i), reduction(+ : j), reduction(+ : q) // expected-error 2 {{argument of OpenMP clause 'reduction' must reference the same object in all threads}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp parallel private(k)
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : p), reduction(+ : p) // expected-error 2 {{argument of OpenMP clause 'reduction' must reference the same object in all threads}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : p), reduction(+ : p) // expected-error {{variable can appear only once in OpenMP 'reduction' clause}} expected-note {{previously referenced here}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : r) // expected-error {{const-qualified list item cannot be reduction}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp parallel shared(i)
|
|
#pragma omp parallel reduction(min : i)
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(max : j) // expected-error {{argument of OpenMP clause 'reduction' must reference the same object in all threads}}
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp parallel private(fl)
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : fl)
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
#pragma omp parallel reduction(* : fl)
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : fl)
|
|
for (int i = 0; i < 10; ++i)
|
|
foo();
|
|
static int m;
|
|
#pragma omp target
|
|
#pragma omp teams
|
|
#pragma omp distribute parallel for reduction(+ : m) // OK
|
|
for (int i = 0; i < 10; ++i)
|
|
m++;
|
|
|
|
return tmain(argc) + tmain(fl); // expected-note {{in instantiation of function template specialization 'tmain<int>' requested here}} expected-note {{in instantiation of function template specialization 'tmain<float>' requested here}}
|
|
}
|