1 // RUN: %clang_cc1 -verify -fopenmp %s -Wno-openmp-mapping -Wuninitialized
2
3 // RUN: %clang_cc1 -verify -fopenmp-simd %s -Wno-openmp-mapping -Wuninitialized
4
foo()5 void foo() {
6 }
7
foobool(int argc)8 bool foobool(int argc) {
9 return argc;
10 }
11
12 struct S1; // expected-note {{declared here}} // expected-note {{forward declaration of 'S1'}}
13 extern S1 a;
14 class S2 {
15 mutable int a;
16 public:
S2()17 S2():a(0) { }
S2(S2 & s2)18 S2(S2 &s2):a(s2.a) { }
19 };
20 const S2 b;
21 const S2 ba[5];
22 class S3 {
23 int a;
24 public:
S3()25 S3():a(0) { }
S3(S3 & s3)26 S3(S3 &s3):a(s3.a) { }
27 };
28 const S3 c;
29 const S3 ca[5];
30 extern const int f;
31 class S4 {
32 int a;
33 S4();
34 S4(const S4 &s4);
35 public:
S4(int v)36 S4(int v):a(v) { }
37 };
38 class S5 {
39 int a;
S5()40 S5():a(0) {}
S5(const S5 & s5)41 S5(const S5 &s5):a(s5.a) { }
42 public:
S5(int v)43 S5(int v):a(v) { }
44 };
45
46 S3 h;
47 #pragma omp threadprivate(h) // expected-note {{defined as threadprivate or thread local}}
48
49 namespace A {
50 double x;
51 #pragma omp threadprivate(x) // expected-note {{defined as threadprivate or thread local}}
52 }
53 namespace B {
54 using A::x;
55 }
56
main(int argc,char ** argv)57 int main(int argc, char **argv) {
58 const int d = 5;
59 const int da[5] = { 0 };
60 S4 e(4);
61 S5 g(5);
62 int i;
63 int &j = i;
64 #pragma omp target
65 #pragma omp teams distribute parallel for shared // expected-error {{expected '(' after 'shared'}}
66 for (int j=0; j<100; j++) foo();
67 #pragma omp target
68 #pragma omp teams distribute parallel for shared ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
69 for (int j=0; j<100; j++) foo();
70 #pragma omp target
71 #pragma omp teams distribute parallel for shared () // expected-error {{expected expression}}
72 for (int j=0; j<100; j++) foo();
73 #pragma omp target
74 #pragma omp teams distribute parallel for shared (argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
75 for (int j=0; j<100; j++) foo();
76 #pragma omp target
77 #pragma omp teams distribute parallel for shared (argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
78 for (int j=0; j<100; j++) foo();
79 #pragma omp target
80 #pragma omp teams distribute parallel for shared (argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
81 for (int j=0; j<100; j++) foo();
82 #pragma omp target
83 #pragma omp teams distribute parallel for shared (argc)
84 for (int j=0; j<100; j++) foo();
85 #pragma omp target
86 #pragma omp teams distribute parallel for shared (S1) // expected-error {{'S1' does not refer to a value}}
87 for (int j=0; j<100; j++) foo();
88 #pragma omp target
89 #pragma omp teams distribute parallel for shared (a, b, c, d, f) // expected-error {{incomplete type 'S1' where a complete type is required}}
90 for (int j=0; j<100; j++) foo();
91 #pragma omp target
92 #pragma omp teams distribute parallel for shared (argv[1]) // expected-error {{expected variable name}}
93 for (int j=0; j<100; j++) foo();
94 #pragma omp target
95 #pragma omp teams distribute parallel for shared(ba)
96 for (int j=0; j<100; j++) foo();
97 #pragma omp target
98 #pragma omp teams distribute parallel for shared(ca)
99 for (int j=0; j<100; j++) foo();
100 #pragma omp target
101 #pragma omp teams distribute parallel for shared(da)
102 for (int j=0; j<100; j++) foo();
103 #pragma omp target
104 #pragma omp teams distribute parallel for shared(e, g)
105 for (int j=0; j<100; j++) foo();
106 #pragma omp target
107 #pragma omp teams distribute parallel for shared(h, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be shared}}
108 for (int j=0; j<100; j++) foo();
109 #pragma omp target
110 #pragma omp teams distribute parallel for private(i), shared(i) // expected-error {{private variable cannot be shared}} expected-note {{defined as private}}
111 for (int j=0; j<100; j++) foo();
112 #pragma omp target
113 #pragma omp teams distribute parallel for firstprivate(i), shared(i) // expected-error {{firstprivate variable cannot be shared}} expected-note {{defined as firstprivate}}
114 for (int j=0; j<100; j++) foo();
115 #pragma omp target
116 #pragma omp teams distribute parallel for private(i)
117 for (int j=0; j<100; j++) foo();
118 #pragma omp target
119 #pragma omp teams distribute parallel for shared(i)
120 for (int j=0; j<100; j++) foo();
121 #pragma omp target
122 #pragma omp teams distribute parallel for shared(j)
123 for (int j=0; j<100; j++) foo();
124 #pragma omp target
125 #pragma omp teams distribute parallel for firstprivate(i)
126 for (int j=0; j<100; j++) foo();
127
128 return 0;
129 }
130