1*67e74705SXin Li // RUN: %clang_cc1 -verify -fopenmp -ferror-limit 100 %s
2*67e74705SXin Li
3*67e74705SXin Li int temp; // expected-note 7 {{'temp' declared here}}
4*67e74705SXin Li
5*67e74705SXin Li #pragma omp declare reduction // expected-error {{expected '(' after 'declare reduction'}}
6*67e74705SXin Li #pragma omp declare reduction { // expected-error {{expected '(' after 'declare reduction'}}
7*67e74705SXin Li #pragma omp declare reduction( // expected-error {{expected identifier or one of the following operators: '+', '-', '*', '&', '|', '^', '&&', or '||'}}
8*67e74705SXin Li #pragma omp declare reduction(# // expected-error {{expected identifier or one of the following operators: '+', '-', '*', '&', '|', '^', '&&', or '||'}}
9*67e74705SXin Li #pragma omp declare reduction(/ // expected-error {{expected identifier or one of the following operators: '+', '-', '*', '&', '|', '^', '&&', or '||'}}
10*67e74705SXin Li #pragma omp declare reduction(+ // expected-error {{expected ':'}}
11*67e74705SXin Li #pragma omp declare reduction(operator // expected-error {{expected identifier or one of the following operators: '+', '-', '*', '&', '|', '^', '&&', or '||'}}
12*67e74705SXin Li #pragma omp declare reduction(operator: // expected-error {{expected identifier or one of the following operators: '+', '-', '*', '&', '|', '^', '&&', or '||'}} expected-error {{expected a type}}
13*67e74705SXin Li #pragma omp declare reduction(oper: // expected-error {{expected a type}}
14*67e74705SXin Li #pragma omp declare reduction(oper; // expected-error {{expected ':'}} expected-error {{expected a type}}
15*67e74705SXin Li #pragma omp declare reduction(fun : int // expected-error {{expected ':'}} expected-error {{expected expression}}
16*67e74705SXin Li #pragma omp declare reduction(+ : const int: // expected-error {{reduction type cannot be qualified with 'const', 'volatile' or 'restrict'}}
17*67e74705SXin Li #pragma omp declare reduction(- : volatile int: // expected-error {{reduction type cannot be qualified with 'const', 'volatile' or 'restrict'}}
18*67e74705SXin Li #pragma omp declare reduction(* : int; // expected-error {{expected ','}} expected-error {{expected a type}}
19*67e74705SXin Li #pragma omp declare reduction(& : double char: // expected-error {{cannot combine with previous 'double' declaration specifier}} expected-error {{expected expression}}
20*67e74705SXin Li #pragma omp declare reduction(^ : double, char, : // expected-error {{expected a type}} expected-error {{expected expression}}
21*67e74705SXin Li #pragma omp declare reduction(&& : int, S: // expected-error {{unknown type name 'S'}} expected-error {{expected expression}}
22*67e74705SXin Li #pragma omp declare reduction(|| : int, double : temp += omp_in) // expected-error 2 {{only 'omp_in' or 'omp_out' variables are allowed in combiner expression}}
23*67e74705SXin Li #pragma omp declare reduction(| : char, float : omp_out += ::temp) // expected-error 2 {{only 'omp_in' or 'omp_out' variables are allowed in combiner expression}}
24*67e74705SXin Li #pragma omp declare reduction(fun : long : omp_out += omp_in) { // expected-warning {{extra tokens at the end of '#pragma omp declare reduction' are ignored}} expected-error {{expected 'initializer'}}
25*67e74705SXin Li #pragma omp declare reduction(fun : unsigned : omp_out += ::temp)) // expected-warning {{extra tokens at the end of '#pragma omp declare reduction' are ignored}} expected-error {{expected 'initializer'}} expected-error {{only 'omp_in' or 'omp_out' variables are allowed in combiner expression}}
26*67e74705SXin Li #pragma omp declare reduction(fun : long & : omp_out += omp_in) // expected-error {{reduction type cannot be a reference type}}
27*67e74705SXin Li #pragma omp declare reduction(fun : long(void) : omp_out += omp_in) // expected-error {{reduction type cannot be a function type}}
28*67e74705SXin Li #pragma omp declare reduction(fun : long[3] : omp_out += omp_in) // expected-error {{reduction type cannot be an array type}}
29*67e74705SXin Li #pragma omp declare reduction(fun23 : long, int, long : omp_out += omp_in) // expected-error {{redefinition of user-defined reduction for type 'long'}} expected-note {{previous definition is here}}
30*67e74705SXin Li
31*67e74705SXin Li template <class T>
32*67e74705SXin Li class Class1 {
33*67e74705SXin Li T a;
34*67e74705SXin Li public:
Class1()35*67e74705SXin Li Class1() : a() {}
36*67e74705SXin Li #pragma omp declare reduction(fun : T : temp) // expected-error {{only 'omp_in' or 'omp_out' variables are allowed in combiner expression}}
37*67e74705SXin Li #pragma omp declare reduction(fun1 : T : omp_out++) // expected-note {{previous definition is here}} expected-error {{reduction type cannot be a reference type}}
38*67e74705SXin Li #pragma omp declare reduction(fun1 : T : omp_out += omp_in) // expected-error {{redefinition of user-defined reduction for type 'T'}}
39*67e74705SXin Li #pragma omp declare reduction(fun2 : T, T : omp_out++) // expected-error {{reduction type cannot be a reference type}} expected-error {{redefinition of user-defined reduction for type 'T'}} expected-note {{previous definition is here}}
40*67e74705SXin Li #pragma omp declare reduction(foo : T : omp_out += this->a) // expected-error {{invalid use of 'this' outside of a non-static member function}}
41*67e74705SXin Li };
42*67e74705SXin Li
43*67e74705SXin Li Class1<char &> e; // expected-note {{in instantiation of template class 'Class1<char &>' requested here}}
44*67e74705SXin Li
45*67e74705SXin Li template <class T>
46*67e74705SXin Li class Class2 : public Class1<T> {
47*67e74705SXin Li #pragma omp declare reduction(fun : T : omp_out += omp_in)
48*67e74705SXin Li };
49*67e74705SXin Li
50*67e74705SXin Li #pragma omp declare reduction(fun222 : long : omp_out += omp_in) // expected-note {{previous definition is here}}
51*67e74705SXin Li #pragma omp declare reduction(fun222 : long : omp_out += omp_in) // expected-error {{redefinition of user-defined reduction for type 'long'}}
52*67e74705SXin Li #pragma omp declare reduction(fun1 : long : omp_out += omp_in) initializer // expected-error {{expected '(' after 'initializer'}}
53*67e74705SXin Li #pragma omp declare reduction(fun2 : long : omp_out += omp_in) initializer { // expected-error {{expected '(' after 'initializer'}} expected-error {{expected expression}} expected-warning {{extra tokens at the end of '#pragma omp declare reduction' are ignored}}
54*67e74705SXin Li #pragma omp declare reduction(fun3 : long : omp_out += omp_in) initializer[ // expected-error {{expected '(' after 'initializer'}} expected-error {{expected expression}} expected-warning {{extra tokens at the end of '#pragma omp declare reduction' are ignored}}
55*67e74705SXin Li #pragma omp declare reduction(fun4 : long : omp_out += omp_in) initializer() // expected-error {{expected expression}}
56*67e74705SXin Li #pragma omp declare reduction(fun5 : long : omp_out += omp_in) initializer(temp) // expected-error {{only 'omp_priv' or 'omp_orig' variables are allowed in initializer expression}}
57*67e74705SXin Li #pragma omp declare reduction(fun6 : long : omp_out += omp_in) initializer(omp_orig // expected-error {{expected ')'}} expected-note {{to match this '('}}
58*67e74705SXin Li #pragma omp declare reduction(fun7 : long : omp_out += omp_in) initializer(omp_priv Class1 < int > ()) // expected-error {{expected ')'}} expected-note {{to match this '('}}
59*67e74705SXin Li #pragma omp declare reduction(fun77 : long : omp_out += omp_in) initializer(omp_priv Class2 < int > ()) // expected-error {{expected ')'}} expected-note {{to match this '('}}
60*67e74705SXin Li #pragma omp declare reduction(fun8 : long : omp_out += omp_in) initializer(omp_priv 23) // expected-error {{expected ')'}} expected-note {{to match this '('}}
61*67e74705SXin Li #pragma omp declare reduction(fun88 : long : omp_out += omp_in) initializer(omp_priv 23)) // expected-error {{expected ')'}} expected-note {{to match this '('}} expected-warning {{extra tokens at the end of '#pragma omp declare reduction' are ignored}}
62*67e74705SXin Li #pragma omp declare reduction(fun9 : long : omp_out += omp_priv) initializer(omp_in = 23) // expected-error {{use of undeclared identifier 'omp_priv'; did you mean 'omp_in'?}} expected-note {{'omp_in' declared here}}
63*67e74705SXin Li #pragma omp declare reduction(fun10 : long : omp_out += omp_in) initializer(omp_priv = 23)
64*67e74705SXin Li
65*67e74705SXin Li template <typename T>
fun(T arg)66*67e74705SXin Li T fun(T arg) {
67*67e74705SXin Li #pragma omp declare reduction(red : T : omp_out++)
68*67e74705SXin Li {
69*67e74705SXin Li #pragma omp declare reduction(red : T : omp_out++) // expected-note {{previous definition is here}}
70*67e74705SXin Li #pragma omp declare reduction(red : T : omp_out++) // expected-error {{redefinition of user-defined reduction for type 'T'}}
71*67e74705SXin Li #pragma omp declare reduction(fun : T : omp_out += omp_in) initializer(omp_priv = 23)
72*67e74705SXin Li }
73*67e74705SXin Li return arg;
74*67e74705SXin Li }
75*67e74705SXin Li
76*67e74705SXin Li template <typename T>
foo(T arg)77*67e74705SXin Li T foo(T arg) {
78*67e74705SXin Li T i;
79*67e74705SXin Li {
80*67e74705SXin Li #pragma omp declare reduction(red : T : omp_out++)
81*67e74705SXin Li #pragma omp declare reduction(red1 : T : omp_out++) // expected-note {{previous definition is here}}
82*67e74705SXin Li #pragma omp declare reduction(red1 : int : omp_out++) // expected-error {{redefinition of user-defined reduction for type 'int'}}
83*67e74705SXin Li #pragma omp parallel reduction (red : i)
84*67e74705SXin Li {
85*67e74705SXin Li }
86*67e74705SXin Li #pragma omp parallel reduction (red1 : i)
87*67e74705SXin Li {
88*67e74705SXin Li }
89*67e74705SXin Li #pragma omp parallel reduction (red2 : i) // expected-error {{incorrect reduction identifier, expected one of '+', '-', '*', '&', '|', '^', '&&', '||', 'min' or 'max' or declare reduction for type 'int'}}
90*67e74705SXin Li {
91*67e74705SXin Li }
92*67e74705SXin Li }
93*67e74705SXin Li {
94*67e74705SXin Li #pragma omp declare reduction(red1 : int : omp_out++) // expected-note {{previous definition is here}}
95*67e74705SXin Li #pragma omp declare reduction(red : T : omp_out++)
96*67e74705SXin Li #pragma omp declare reduction(red1 : T : omp_out++) // expected-error {{redefinition of user-defined reduction for type 'int'}}
97*67e74705SXin Li #pragma omp parallel reduction (red : i)
98*67e74705SXin Li {
99*67e74705SXin Li }
100*67e74705SXin Li #pragma omp parallel reduction (red1 : i)
101*67e74705SXin Li {
102*67e74705SXin Li }
103*67e74705SXin Li #pragma omp parallel reduction (red2 : i) // expected-error {{incorrect reduction identifier, expected one of '+', '-', '*', '&', '|', '^', '&&', '||', 'min' or 'max' or declare reduction for type 'int'}}
104*67e74705SXin Li {
105*67e74705SXin Li }
106*67e74705SXin Li }
107*67e74705SXin Li return arg;
108*67e74705SXin Li }
109*67e74705SXin Li
110*67e74705SXin Li #pragma omp declare reduction(foo : int : ({int a = omp_in; a = a * 2; omp_out += a; }))
main()111*67e74705SXin Li int main() {
112*67e74705SXin Li Class1<int> c1;
113*67e74705SXin Li int i;
114*67e74705SXin Li #pragma omp parallel reduction (::fun : c1)
115*67e74705SXin Li {
116*67e74705SXin Li }
117*67e74705SXin Li #pragma omp parallel reduction (::Class1<int>::fun : c1)
118*67e74705SXin Li {
119*67e74705SXin Li }
120*67e74705SXin Li #pragma omp parallel reduction (::Class2<int>::fun : i) // expected-error {{incorrect reduction identifier, expected one of '+', '-', '*', '&', '|', '^', '&&', '||', 'min' or 'max' or declare reduction for type 'int'}}
121*67e74705SXin Li {
122*67e74705SXin Li }
123*67e74705SXin Li return fun(15) + foo(15); // expected-note {{in instantiation of function template specialization 'foo<int>' requested here}}
124*67e74705SXin Li }
125