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