1*0a6a1f1dSLionel Sambuc // RUN: %clang_cc1 -verify -fopenmp=libiomp5 -ferror-limit 100 %s
2*0a6a1f1dSLionel Sambuc
foo()3*0a6a1f1dSLionel Sambuc void foo() {
4*0a6a1f1dSLionel Sambuc }
5*0a6a1f1dSLionel Sambuc
foobool(int argc)6*0a6a1f1dSLionel Sambuc bool foobool(int argc) {
7*0a6a1f1dSLionel Sambuc return argc;
8*0a6a1f1dSLionel Sambuc }
9*0a6a1f1dSLionel Sambuc
10*0a6a1f1dSLionel Sambuc struct S1; // expected-note {{declared here}} expected-note{{forward declaration of 'S1'}}
11*0a6a1f1dSLionel Sambuc extern S1 a;
12*0a6a1f1dSLionel Sambuc class S2 {
13*0a6a1f1dSLionel Sambuc mutable int a;
14*0a6a1f1dSLionel Sambuc
15*0a6a1f1dSLionel Sambuc public:
S2()16*0a6a1f1dSLionel Sambuc S2() : a(0) {}
17*0a6a1f1dSLionel Sambuc static float S2s; // expected-note {{static data member is predetermined as shared}}
18*0a6a1f1dSLionel Sambuc };
19*0a6a1f1dSLionel Sambuc const S2 b;
20*0a6a1f1dSLionel Sambuc const S2 ba[5];
21*0a6a1f1dSLionel Sambuc class S3 {
22*0a6a1f1dSLionel Sambuc int a;
23*0a6a1f1dSLionel Sambuc
24*0a6a1f1dSLionel Sambuc public:
S3()25*0a6a1f1dSLionel Sambuc S3() : a(0) {}
26*0a6a1f1dSLionel Sambuc };
27*0a6a1f1dSLionel Sambuc const S3 c; // expected-note {{global variable is predetermined as shared}}
28*0a6a1f1dSLionel Sambuc const S3 ca[5]; // expected-note {{global variable is predetermined as shared}}
29*0a6a1f1dSLionel Sambuc extern const int f; // expected-note {{global variable is predetermined as shared}}
30*0a6a1f1dSLionel Sambuc class S4 {
31*0a6a1f1dSLionel Sambuc int a;
32*0a6a1f1dSLionel Sambuc S4(); // expected-note {{implicitly declared private here}}
33*0a6a1f1dSLionel Sambuc
34*0a6a1f1dSLionel Sambuc public:
S4(int v)35*0a6a1f1dSLionel Sambuc S4(int v) : a(v) {}
36*0a6a1f1dSLionel Sambuc };
37*0a6a1f1dSLionel Sambuc class S5 {
38*0a6a1f1dSLionel Sambuc int a;
S5()39*0a6a1f1dSLionel Sambuc S5() : a(0) {} // expected-note {{implicitly declared private here}}
40*0a6a1f1dSLionel Sambuc
41*0a6a1f1dSLionel Sambuc public:
S5(int v)42*0a6a1f1dSLionel Sambuc S5(int v) : a(v) {}
43*0a6a1f1dSLionel Sambuc };
44*0a6a1f1dSLionel Sambuc
45*0a6a1f1dSLionel Sambuc int threadvar;
46*0a6a1f1dSLionel Sambuc #pragma omp threadprivate(threadvar) // expected-note {{defined as threadprivate or thread local}}
47*0a6a1f1dSLionel Sambuc
main(int argc,char ** argv)48*0a6a1f1dSLionel Sambuc int main(int argc, char **argv) {
49*0a6a1f1dSLionel Sambuc const int d = 5; // expected-note {{constant variable is predetermined as shared}}
50*0a6a1f1dSLionel Sambuc const int da[5] = {0}; // expected-note {{constant variable is predetermined as shared}}
51*0a6a1f1dSLionel Sambuc S4 e(4);
52*0a6a1f1dSLionel Sambuc S5 g(5);
53*0a6a1f1dSLionel Sambuc int i;
54*0a6a1f1dSLionel Sambuc int &j = i; // expected-note {{'j' defined here}}
55*0a6a1f1dSLionel Sambuc #pragma omp task private // expected-error {{expected '(' after 'private'}}
56*0a6a1f1dSLionel Sambuc #pragma omp task private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
57*0a6a1f1dSLionel Sambuc #pragma omp task private() // expected-error {{expected expression}}
58*0a6a1f1dSLionel Sambuc #pragma omp task private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
59*0a6a1f1dSLionel Sambuc #pragma omp task private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
60*0a6a1f1dSLionel Sambuc #pragma omp task private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
61*0a6a1f1dSLionel Sambuc #pragma omp task private(argc argv) // expected-error {{expected ',' or ')' in 'private' clause}}
62*0a6a1f1dSLionel Sambuc #pragma omp task private(S1) // expected-error {{'S1' does not refer to a value}}
63*0a6a1f1dSLionel Sambuc #pragma omp task private(a, b, c, d, f) // expected-error {{a private variable with incomplete type 'S1'}} expected-error 3 {{shared variable cannot be private}}
64*0a6a1f1dSLionel Sambuc #pragma omp task private(argv[1]) // expected-error {{expected variable name}}
65*0a6a1f1dSLionel Sambuc #pragma omp task private(ba)
66*0a6a1f1dSLionel Sambuc #pragma omp task private(ca) // expected-error {{shared variable cannot be private}}
67*0a6a1f1dSLionel Sambuc #pragma omp task private(da) // expected-error {{shared variable cannot be private}}
68*0a6a1f1dSLionel Sambuc #pragma omp task private(S2::S2s) // expected-error {{shared variable cannot be private}}
69*0a6a1f1dSLionel Sambuc #pragma omp task private(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}
70*0a6a1f1dSLionel Sambuc #pragma omp task private(threadvar) // expected-error {{threadprivate or thread local variable cannot be private}}
71*0a6a1f1dSLionel Sambuc #pragma omp task shared(i), private(i) // expected-error {{shared variable cannot be private}} expected-note {{defined as shared}}
72*0a6a1f1dSLionel Sambuc foo();
73*0a6a1f1dSLionel Sambuc #pragma omp task firstprivate(i) private(i) // expected-error {{firstprivate variable cannot be private}} expected-note {{defined as firstprivate}}
74*0a6a1f1dSLionel Sambuc foo();
75*0a6a1f1dSLionel Sambuc #pragma omp task private(i)
76*0a6a1f1dSLionel Sambuc #pragma omp task private(j) // expected-error {{arguments of OpenMP clause 'private' cannot be of reference type 'int &'}}
77*0a6a1f1dSLionel Sambuc foo();
78*0a6a1f1dSLionel Sambuc #pragma omp task firstprivate(i)
79*0a6a1f1dSLionel Sambuc for (int k = 0; k < 10; ++k) {
80*0a6a1f1dSLionel Sambuc #pragma omp task private(i)
81*0a6a1f1dSLionel Sambuc foo();
82*0a6a1f1dSLionel Sambuc }
83*0a6a1f1dSLionel Sambuc
84*0a6a1f1dSLionel Sambuc return 0;
85*0a6a1f1dSLionel Sambuc }
86