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