165 lines · cpp
1// RUN: %clang_cc1 -verify -fopenmp %s -Wno-openmp-mapping -Wuninitialized2 3// RUN: %clang_cc1 -verify -fopenmp-simd %s -Wno-openmp-mapping -Wuninitialized4 5extern int omp_default_mem_alloc;6void foo() {7}8 9bool foobool(int argc) {10 return argc;11}12 13void xxx(int argc) {14 int fp; // expected-note {{initialize the variable 'fp' to silence this warning}}15#pragma omp target16#pragma omp teams distribute firstprivate(fp) // expected-warning {{variable 'fp' is uninitialized when used here}}17 for (int i = 0; i < 10; ++i)18 ;19}20 21struct S1; // expected-note {{declared here}} expected-note 2 {{forward declaration of 'S1'}}22extern S1 a;23class S2 {24 mutable int a;25 26public:27 S2() : a(0) {}28 S2(const S2 &s2) : a(s2.a) {}29 static float S2s;30 static const float S2sc;31};32const float S2::S2sc = 0;33const S2 b;34const S2 ba[5];35class S3 {36 int a;37 S3 &operator=(const S3 &s3);38 39public:40 S3() : a(0) {} // expected-note 2 {{candidate constructor not viable: requires 0 arguments, but 1 was provided}}41 S3(S3 &s3) : a(s3.a) {} // expected-note 2 {{candidate constructor not viable: 1st argument ('const S3') would lose const qualifier}}42};43const S3 c;44const S3 ca[5];45extern const int f;46class S4 {47 int a;48 S4();49 S4(const S4 &s4);50public:51 S4(int v):a(v) { }52};53class S5 {54 int a;55 S5():a(0) {}56 S5(const S5 &s5):a(s5.a) { }57public:58 S5(int v):a(v) { }59};60class S6 {61 int a;62public:63 S6() : a(0) { }64};65 66S3 h;67#pragma omp threadprivate(h) // expected-note {{defined as threadprivate or thread local}}68 69int main(int argc, char **argv) {70 const int d = 5;71 const int da[5] = { 0 };72 S4 e(4);73 S5 g(5);74 S6 p;75 int i, z;76 int &j = i;77 78#pragma omp target79#pragma omp teams distribute firstprivate // expected-error {{expected '(' after 'firstprivate'}}80 for (i = 0; i < argc; ++i) foo();81 82#pragma omp target83#pragma omp teams distribute firstprivate ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}84 for (i = 0; i < argc; ++i) foo();85 86#pragma omp target87#pragma omp teams distribute firstprivate () // expected-error {{expected expression}}88 for (i = 0; i < argc; ++i) foo();89 90#pragma omp target91#pragma omp teams distribute firstprivate (argc // expected-error {{expected ')'}} expected-note {{to match this '('}}92 for (i = 0; i < argc; ++i) foo();93 94#pragma omp target95#pragma omp teams distribute firstprivate (argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}96 for (i = 0; i < argc; ++i) foo();97 98#pragma omp target99#pragma omp teams distribute firstprivate (argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}100 for (i = 0; i < argc; ++i) foo();101 102#pragma omp target103#pragma omp teams distribute 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 '('}}104 for (i = 0; i < argc; ++i) foo();105 106#pragma omp target107#pragma omp teams distribute firstprivate (S1) // expected-error {{'S1' does not refer to a value}}108 for (i = 0; i < argc; ++i) foo();109 110#pragma omp target111#pragma omp teams distribute firstprivate (a, b, c, d, f) // expected-error {{firstprivate variable with incomplete type 'S1'}} expected-error {{incomplete type 'S1' where a complete type is required}} expected-error {{no matching constructor for initialization of 'S3'}}112 for (i = 0; i < argc; ++i) foo();113 114#pragma omp target115#pragma omp teams distribute firstprivate (argv[1]) // expected-error {{expected variable name}}116 for (i = 0; i < argc; ++i) foo();117 118#pragma omp target119#pragma omp teams distribute firstprivate(ba, z)120 for (i = 0; i < argc; ++i) foo();121 122#pragma omp target123#pragma omp teams distribute firstprivate(ca) // expected-error {{no matching constructor for initialization of 'S3'}}124 for (i = 0; i < argc; ++i) foo();125 126#pragma omp target127#pragma omp teams distribute firstprivate(da)128 for (i = 0; i < argc; ++i) foo();129 130#pragma omp target131#pragma omp teams distribute firstprivate(S2::S2s)132 for (i = 0; i < argc; ++i) foo();133 134#pragma omp target135#pragma omp teams distribute firstprivate(S2::S2sc)136 for (i = 0; i < argc; ++i) foo();137 138#pragma omp target139#pragma omp teams distribute firstprivate(h) // expected-error {{threadprivate or thread local variable cannot be firstprivate}}140 for (i = 0; i < argc; ++i) foo();141 142#pragma omp target143#pragma omp teams distribute private(i), firstprivate(i) // expected-error {{private variable cannot be firstprivate}} expected-note{{defined as private}}144 for (i = 0; i < argc; ++i) foo();145 146#pragma omp target147#pragma omp teams distribute firstprivate(i)148 for (j = 0; j < argc; ++j) foo();149 150#pragma omp target151#pragma omp teams distribute firstprivate(i) // expected-note {{defined as firstprivate}}152 for (i = 0; i < argc; ++i) foo(); // expected-error {{loop iteration variable in the associated loop of 'omp teams distribute' directive may not be firstprivate, predetermined as private}}153 154#pragma omp target155#pragma omp teams distribute firstprivate(j)156 for (i = 0; i < argc; ++i) foo();157 158// expected-error@+2 {{lastprivate variable cannot be firstprivate}} expected-note@+2 {{defined as lastprivate}}159#pragma omp target160#pragma omp teams distribute lastprivate(argc), firstprivate(argc)161 for (i = 0; i < argc; ++i) foo();162 163 return 0;164}165