1 // RUN: %clang_cc1 -verify=expected,omp45 -fopenmp-version=45 -fopenmp %s -Wuninitialized 2 // RUN: %clang_cc1 -verify=expected,omp50 -fopenmp-version=50 -fopenmp %s -Wuninitialized 3 4 // RUN: %clang_cc1 -verify=expected,omp45 -fopenmp-version=45 -fopenmp-simd %s -Wuninitialized 5 // RUN: %clang_cc1 -verify=expected,omp50 -fopenmp-version=50 -fopenmp-simd %s -Wuninitialized 6 7 extern int omp_default_mem_alloc; 8 void foo() { 9 } 10 11 bool foobool(int argc) { 12 return argc; 13 } 14 15 struct S1; // expected-note 2 {{declared here}} expected-note 2 {{forward declaration of 'S1'}} 16 extern S1 a; 17 class S2 { 18 mutable int a; 19 20 public: 21 S2() : a(0) {} 22 S2(S2 &s2) : a(s2.a) {} 23 S2 &operator=(const S2 &); 24 const S2 &operator=(const S2 &) const; 25 static float S2s; // expected-note {{static data member is predetermined as shared}} 26 static const float S2sc; // expected-note {{'S2sc' declared here}} 27 }; 28 const float S2::S2sc = 0; 29 const S2 b; 30 const S2 ba[5]; 31 class S3 { 32 int a; 33 S3 &operator=(const S3 &s3); // expected-note 2 {{implicitly declared private here}} 34 35 public: 36 S3() : a(0) {} 37 S3(S3 &s3) : a(s3.a) {} 38 }; 39 const S3 c; // expected-note {{'c' defined here}} 40 const S3 ca[5]; // expected-note {{'ca' defined here}} 41 extern const int f; // expected-note {{'f' declared here}} 42 class S4 { 43 int a; 44 S4(); // expected-note 3 {{implicitly declared private here}} 45 S4(const S4 &s4); 46 47 public: 48 S4(int v) : a(v) {} 49 }; 50 class S5 { 51 int a; 52 S5() : a(0) {} // expected-note {{implicitly declared private here}} 53 54 public: 55 S5(const S5 &s5) : a(s5.a) {} 56 S5(int v) : a(v) {} 57 }; 58 class S6 { 59 int a; 60 S6() : a(0) {} // omp45-note 2 {{implicitly declared private here}} 61 62 public: 63 S6(const S6 &s6) : a(s6.a) {} 64 S6(int v) : a(v) {} 65 }; 66 67 S3 h; 68 #pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}} 69 70 template <class I, class C> 71 int foomain(int argc, char **argv) { 72 I e(4); 73 I g(5); 74 int i, z; 75 int &j = i; 76 S6 s(0); // omp50-note {{'s' defined here}} 77 #pragma omp parallel for lastprivate // expected-error {{expected '(' after 'lastprivate'}} 78 for (int k = 0; k < argc; ++k) 79 ++k; 80 #pragma omp parallel for lastprivate( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} 81 for (int k = 0; k < argc; ++k) 82 ++k; 83 #pragma omp parallel for lastprivate() // expected-error {{expected expression}} 84 for (int k = 0; k < argc; ++k) 85 ++k; 86 #pragma omp parallel for lastprivate(argc // expected-error {{expected ')'}} expected-note {{to match this '('}} 87 for (int k = 0; k < argc; ++k) 88 ++k; 89 #pragma omp parallel for lastprivate(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} 90 for (int k = 0; k < argc; ++k) 91 ++k; 92 #pragma omp parallel for lastprivate(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}} 93 for (int k = 0; k < argc; ++k) 94 ++k; 95 #pragma omp parallel for lastprivate(argc) allocate , allocate(, allocate(omp_default , allocate(omp_default_mem_alloc, allocate(omp_default_mem_alloc:, allocate(omp_default_mem_alloc: argc, allocate(omp_default_mem_alloc: argv), allocate(argv) // expected-error {{expected '(' after 'allocate'}} expected-error 2 {{expected expression}} expected-error 2 {{expected ')'}} expected-error {{use of undeclared identifier 'omp_default'}} expected-note 2 {{to match this '('}} 96 for (int k = 0; k < argc; ++k) 97 ++k; 98 #pragma omp parallel for lastprivate(conditional: argc,s) lastprivate(conditional: // omp50-error {{expected expression}} omp45-error 2 {{use of undeclared identifier 'conditional'}} expected-error {{expected ')'}} expected-note {{to match this '('}} omp45-error 2 {{calling a private constructor of class 'S6'}} omp50-error {{expected list item of scalar type in 'lastprivate' clause with 'conditional' modifier}} 99 for (int k = 0; k < argc; ++k) 100 ++k; 101 #pragma omp parallel for lastprivate(foo:argc) // omp50-error {{expected 'conditional' in OpenMP clause 'lastprivate'}} omp45-error {{expected ',' or ')' in 'lastprivate' clause}} omp45-error {{expected ')'}} omp45-error {{expected variable name}} omp45-note {{to match this '('}} 102 for (int k = 0; k < argc; ++k) 103 ++k; 104 #pragma omp parallel for lastprivate(S1) // expected-error {{'S1' does not refer to a value}} 105 for (int k = 0; k < argc; ++k) 106 ++k; 107 #pragma omp parallel for lastprivate(z, a, b) // expected-error {{lastprivate variable with incomplete type 'S1'}} 108 for (int k = 0; k < argc; ++k) 109 ++k; 110 #pragma omp parallel for lastprivate(argv[1]) // expected-error {{expected variable name}} 111 for (int k = 0; k < argc; ++k) 112 ++k; 113 #pragma omp parallel for lastprivate(e, g) // expected-error 2 {{calling a private constructor of class 'S4'}} 114 for (int k = 0; k < argc; ++k) 115 ++k; 116 #pragma omp parallel for lastprivate(h) // expected-error {{threadprivate or thread local variable cannot be lastprivate}} 117 for (int k = 0; k < argc; ++k) 118 ++k; 119 #pragma omp parallel 120 { 121 int v = 0; 122 int i; 123 #pragma omp parallel for lastprivate(i) 124 for (int k = 0; k < argc; ++k) { 125 i = k; 126 v += i; 127 } 128 } 129 #pragma omp parallel shared(i) 130 #pragma omp parallel private(i) 131 #pragma omp parallel for lastprivate(j) 132 for (int k = 0; k < argc; ++k) 133 ++k; 134 #pragma omp parallel for lastprivate(i) 135 for (int k = 0; k < argc; ++k) 136 ++k; 137 return 0; 138 } 139 140 namespace A { 141 double x; 142 #pragma omp threadprivate(x) // expected-note {{defined as threadprivate or thread local}} 143 } 144 namespace B { 145 using A::x; 146 } 147 148 int main(int argc, char **argv) { 149 const int d = 5; // expected-note {{'d' defined here}} 150 const int da[5] = {0}; // expected-note {{'da' defined here}} 151 S4 e(4); 152 S5 g(5); 153 S3 m; 154 S6 n(2); 155 int i, z; 156 int &j = i; 157 #pragma omp parallel for lastprivate // expected-error {{expected '(' after 'lastprivate'}} 158 for (i = 0; i < argc; ++i) 159 foo(); 160 #pragma omp parallel for lastprivate( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} 161 for (i = 0; i < argc; ++i) 162 foo(); 163 #pragma omp parallel for lastprivate() // expected-error {{expected expression}} 164 for (i = 0; i < argc; ++i) 165 foo(); 166 #pragma omp parallel for lastprivate(argc // expected-error {{expected ')'}} expected-note {{to match this '('}} 167 for (i = 0; i < argc; ++i) 168 foo(); 169 #pragma omp parallel for lastprivate(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} 170 for (i = 0; i < argc; ++i) 171 foo(); 172 #pragma omp parallel for lastprivate(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}} 173 for (i = 0; i < argc; ++i) 174 foo(); 175 #pragma omp parallel for lastprivate(argc, z) 176 for (i = 0; i < argc; ++i) 177 foo(); 178 #pragma omp parallel for lastprivate(S1) // expected-error {{'S1' does not refer to a value}} 179 for (i = 0; i < argc; ++i) 180 foo(); 181 #pragma omp parallel for lastprivate(a, b, c, d, f) // expected-error {{lastprivate variable with incomplete type 'S1'}} expected-error 1 {{const-qualified variable without mutable fields cannot be lastprivate}} expected-error 2 {{const-qualified variable cannot be lastprivate}} 182 for (i = 0; i < argc; ++i) 183 foo(); 184 #pragma omp parallel for lastprivate(argv[1]) // expected-error {{expected variable name}} 185 for (i = 0; i < argc; ++i) 186 foo(); 187 #pragma omp parallel for lastprivate(2 * 2) // expected-error {{expected variable name}} 188 for (i = 0; i < argc; ++i) 189 foo(); 190 #pragma omp parallel for lastprivate(ba) 191 for (i = 0; i < argc; ++i) 192 foo(); 193 #pragma omp parallel for lastprivate(ca) // expected-error {{const-qualified variable without mutable fields cannot be lastprivate}} 194 for (i = 0; i < argc; ++i) 195 foo(); 196 #pragma omp parallel for lastprivate(da) // expected-error {{const-qualified variable cannot be lastprivate}} 197 for (i = 0; i < argc; ++i) 198 foo(); 199 int xa; 200 #pragma omp parallel for lastprivate(xa) // OK 201 for (i = 0; i < argc; ++i) 202 foo(); 203 #pragma omp parallel for lastprivate(S2::S2s) // expected-error {{shared variable cannot be lastprivate}} 204 for (i = 0; i < argc; ++i) 205 foo(); 206 #pragma omp parallel for lastprivate(S2::S2sc) // expected-error {{const-qualified variable cannot be lastprivate}} 207 for (i = 0; i < argc; ++i) 208 foo(); 209 #pragma omp parallel for safelen(5) // expected-error {{unexpected OpenMP clause 'safelen' in directive '#pragma omp parallel for'}} 210 for (i = 0; i < argc; ++i) 211 foo(); 212 #pragma omp parallel for lastprivate(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}} 213 for (i = 0; i < argc; ++i) 214 foo(); 215 #pragma omp parallel for lastprivate(m) // expected-error {{'operator=' is a private member of 'S3'}} 216 for (i = 0; i < argc; ++i) 217 foo(); 218 #pragma omp parallel for lastprivate(h, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be lastprivate}} 219 for (i = 0; i < argc; ++i) 220 foo(); 221 #pragma omp parallel for private(xa), lastprivate(xa) // expected-error {{private variable cannot be lastprivate}} expected-note {{defined as private}} 222 for (i = 0; i < argc; ++i) 223 foo(); 224 #pragma omp parallel for lastprivate(i) 225 for (i = 0; i < argc; ++i) 226 foo(); 227 #pragma omp parallel private(xa) 228 #pragma omp parallel for lastprivate(xa) 229 for (i = 0; i < argc; ++i) 230 foo(); 231 #pragma omp parallel reduction(+ : xa) 232 #pragma omp parallel for lastprivate(xa) 233 for (i = 0; i < argc; ++i) 234 foo(); 235 #pragma omp parallel for lastprivate(j) 236 for (i = 0; i < argc; ++i) 237 foo(); 238 #pragma omp parallel for firstprivate(m) lastprivate(m) // expected-error {{'operator=' is a private member of 'S3'}} 239 for (i = 0; i < argc; ++i) 240 foo(); 241 #pragma omp parallel for lastprivate(n) firstprivate(n) // OK 242 for (i = 0; i < argc; ++i) 243 foo(); 244 static int si; 245 #pragma omp parallel for lastprivate(si) // OK 246 for (i = 0; i < argc; ++i) 247 si = i + 2; 248 249 return foomain<S4, S5>(argc, argv); // expected-note {{in instantiation of function template specialization 'foomain<S4, S5>' requested here}} 250 } 251