1 | // RUN: %clang_cc1 -verify -fopenmp -ferror-limit 100 %s |
2 | |
3 | // RUN: %clang_cc1 -verify -fopenmp-simd -ferror-limit 100 %s |
4 | |
5 | typedef void **omp_allocator_handle_t; |
6 | extern const omp_allocator_handle_t omp_default_mem_alloc; |
7 | extern const omp_allocator_handle_t omp_large_cap_mem_alloc; |
8 | extern const omp_allocator_handle_t omp_const_mem_alloc; |
9 | extern const omp_allocator_handle_t omp_high_bw_mem_alloc; |
10 | extern const omp_allocator_handle_t omp_low_lat_mem_alloc; |
11 | extern const omp_allocator_handle_t omp_cgroup_mem_alloc; |
12 | extern const omp_allocator_handle_t omp_pteam_mem_alloc; |
13 | extern const omp_allocator_handle_t omp_thread_mem_alloc; |
14 | |
15 | void foo() { |
16 | } |
17 | |
18 | bool foobool(int argc) { |
19 | return argc; |
20 | } |
21 | |
22 | template <typename T> |
23 | struct S { |
24 | T b; |
25 | S(T a, T c) { |
26 | #pragma omp task default(none) firstprivate(a, b) |
27 | a = b = c; // expected-error {{variable 'c' must have explicitly specified data sharing attributes}} |
28 | } |
29 | }; |
30 | |
31 | S<int> s(3, 4); // expected-note {{in instantiation of member function 'S<int>::S' requested here}} |
32 | |
33 | struct S1; // expected-note {{declared here}} expected-note{{forward declaration of 'S1'}} |
34 | extern S1 a; |
35 | class S2 { |
36 | mutable int a; |
37 | |
38 | public: |
39 | S2() : a(0) {} |
40 | S2(const S2 &s2) : a(s2.a) {} |
41 | static float S2s; |
42 | static const float S2sc; |
43 | }; |
44 | const float S2::S2sc = 0; |
45 | const S2 b; |
46 | const S2 ba[5]; |
47 | class S3 { |
48 | int a; |
49 | |
50 | public: |
51 | S3() : a(0) {} |
52 | S3(const S3 &s3) : a(s3.a) {} |
53 | }; |
54 | const S3 c; |
55 | const S3 ca[5]; |
56 | extern const int f; |
57 | class S4 { |
58 | int a; |
59 | S4(); |
60 | S4(const S4 &s4); // expected-note 16 {{implicitly declared private here}} |
61 | |
62 | public: |
63 | S4(int v) : a(v) {} |
64 | }; |
65 | class S5 { |
66 | int a; |
67 | S5() : a(0) {} |
68 | S5(const S5 &s5) : a(s5.a) {} // expected-note 16 {{implicitly declared private here}} |
69 | |
70 | public: |
71 | S5(int v) : a(v) {} |
72 | }; |
73 | |
74 | S3 h; |
75 | #pragma omp threadprivate(h) // expected-note {{defined as threadprivate or thread local}} |
76 | |
77 | void bar(int n, int b[n]) { |
78 | #pragma omp task firstprivate(b) |
79 | foo(); |
80 | } |
81 | |
82 | namespace A { |
83 | double x; |
84 | #pragma omp threadprivate(x) // expected-note {{defined as threadprivate or thread local}} |
85 | } |
86 | namespace B { |
87 | using A::x; |
88 | } |
89 | |
90 | int main(int argc, char **argv) { |
91 | const int d = 5; |
92 | const int da[5] = {0}; |
93 | S4 e(4); |
94 | S5 g(5); |
95 | int i; |
96 | int &j = i; |
97 | static int m; |
98 | #pragma omp task firstprivate // expected-error {{expected '(' after 'firstprivate'}} |
99 | #pragma omp task firstprivate( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} |
100 | #pragma omp task firstprivate() // expected-error {{expected expression}} |
101 | #pragma omp task firstprivate(argc // expected-error {{expected ')'}} expected-note {{to match this '('}} |
102 | #pragma omp task firstprivate(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} |
103 | #pragma omp task firstprivate(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}} |
104 | #pragma omp task 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 '('}} |
105 | #pragma omp task firstprivate(S1) // expected-error {{'S1' does not refer to a value}} |
106 | #pragma omp task firstprivate(a, b, c, d, f) // expected-error {{firstprivate variable with incomplete type 'S1'}} |
107 | #pragma omp task firstprivate(argv[1]) // expected-error {{expected variable name}} |
108 | #pragma omp task allocate(omp_thread_mem_alloc: ba) firstprivate(ba) // expected-warning {{allocator with the 'thread' trait access has unspecified behavior on 'task' directive}} |
109 | #pragma omp task firstprivate(ca) |
110 | #pragma omp task firstprivate(da) |
111 | #pragma omp task firstprivate(S2::S2s) |
112 | #pragma omp task firstprivate(S2::S2sc) |
113 | #pragma omp task firstprivate(e, g) // expected-error 16 {{calling a private constructor of class 'S4'}} expected-error 16 {{calling a private constructor of class 'S5'}} |
114 | #pragma omp task firstprivate(h, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be firstprivate}} |
115 | #pragma omp task private(i), firstprivate(i) // expected-error {{private variable cannot be firstprivate}} expected-note{{defined as private}} |
116 | foo(); |
117 | #pragma omp task shared(i) |
118 | #pragma omp task firstprivate(i) |
119 | #pragma omp task firstprivate(j) |
120 | #pragma omp task firstprivate(m) // OK |
121 | foo(); |
122 | |
123 | return 0; |
124 | } |
125 | |