Clang Project

clang_source_code/test/OpenMP/target_teams_distribute_firstprivate_messages.cpp
1// RUN: %clang_cc1 -verify -fopenmp %s
2
3// RUN: %clang_cc1 -verify -fopenmp-simd %s
4
5typedef void **omp_allocator_handle_t;
6extern const omp_allocator_handle_t omp_default_mem_alloc;
7extern const omp_allocator_handle_t omp_large_cap_mem_alloc;
8extern const omp_allocator_handle_t omp_const_mem_alloc;
9extern const omp_allocator_handle_t omp_high_bw_mem_alloc;
10extern const omp_allocator_handle_t omp_low_lat_mem_alloc;
11extern const omp_allocator_handle_t omp_cgroup_mem_alloc;
12extern const omp_allocator_handle_t omp_pteam_mem_alloc;
13extern const omp_allocator_handle_t omp_thread_mem_alloc;
14
15void foo() {
16}
17
18bool foobool(int argc) {
19  return argc;
20}
21
22struct S1; // expected-note {{declared here}} expected-note{{forward declaration of 'S1'}}
23extern S1 a;
24class S2 {
25  mutable int a;
26  
27public:
28  S2() : a(0) {}
29  S2(const S2 &s2) : a(s2.a) {}
30  static float S2s;
31  static const float S2sc;
32};
33const float S2::S2sc = 0;
34const S2 b;
35const S2 ba[5];
36class S3 {
37  int a;
38  S3 &operator=(const S3 &s3);
39  
40public:
41  S3() : a(0) {} // expected-note 2 {{candidate constructor not viable: requires 0 arguments, but 1 was provided}}
42  S3(S3 &s3) : a(s3.a) {} // expected-note 2 {{candidate constructor not viable: 1st argument ('const S3') would lose const qualifier}}
43};
44const S3 c;
45const S3 ca[5];
46extern const int f;
47class S4 {
48  int a;
49  S4();
50  S4(const S4 &s4);
51public:
52  S4(int v):a(v) { }
53};
54class S5 {
55  int a;
56  S5():a(0) {}
57  S5(const S5 &s5):a(s5.a) { }
58public:
59  S5(int v):a(v) { }
60};
61class S6 {
62  int a;
63public:
64  S6() : a(0) { }
65};
66
67S3 h;
68#pragma omp threadprivate(h) // expected-note {{defined as threadprivate or thread local}}
69
70int main(int argc, char **argv) {
71  const int d = 5;
72  const int da[5] = { 0 };
73  S4 e(4);
74  S5 g(5);
75  S6 p;
76  int i;
77  int &j = i;
78
79#pragma omp target teams distribute firstprivate // expected-error {{expected '(' after 'firstprivate'}}
80  for (i = 0; i < argc; ++i) foo();
81
82#pragma omp target teams distribute firstprivate ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
83  for (i = 0; i < argc; ++i) foo();
84
85#pragma omp target teams distribute firstprivate () // expected-error {{expected expression}}
86  for (i = 0; i < argc; ++i) foo();
87
88#pragma omp target teams distribute firstprivate (argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
89  for (i = 0; i < argc; ++i) foo();
90
91#pragma omp target teams distribute firstprivate (argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
92  for (i = 0; i < argc; ++i) foo();
93
94#pragma omp target teams distribute firstprivate (argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
95  for (i = 0; i < argc; ++i) foo();
96
97#pragma omp target 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 '('}}
98  for (i = 0; i < argc; ++i) foo();
99
100#pragma omp target teams distribute firstprivate (S1) // expected-error {{'S1' does not refer to a value}}
101  for (i = 0; i < argc; ++i) foo();
102
103#pragma omp target teams distribute firstprivate (a, b, c, d, f) // expected-error {{firstprivate variable with incomplete type 'S1'}} expected-error {{no matching constructor for initialization of 'S3'}}
104  for (i = 0; i < argc; ++i) foo();
105
106#pragma omp target teams distribute firstprivate (argv[1]) // expected-error {{expected variable name}}
107  for (i = 0; i < argc; ++i) foo();
108
109#pragma omp target teams distribute firstprivate(ba) allocate(omp_thread_mem_alloc: ba) // expected-warning {{allocator with the 'thread' trait access has unspecified behavior on 'target teams distribute' directive}}
110  for (i = 0; i < argc; ++i) foo();
111
112#pragma omp target
113#pragma omp teams distribute firstprivate(ca) // expected-error {{no matching constructor for initialization of 'S3'}}
114  for (i = 0; i < argc; ++i) foo();
115
116#pragma omp target teams distribute firstprivate(da)
117  for (i = 0; i < argc; ++i) foo();
118
119#pragma omp target teams distribute firstprivate(S2::S2s)
120  for (i = 0; i < argc; ++i) foo();
121
122#pragma omp target teams distribute firstprivate(S2::S2sc)
123  for (i = 0; i < argc; ++i) foo();
124
125#pragma omp target teams distribute firstprivate(h) // expected-error {{threadprivate or thread local variable cannot be firstprivate}}
126  for (i = 0; i < argc; ++i) foo();
127
128#pragma omp target teams distribute private(i), firstprivate(i) // expected-error {{private variable cannot be firstprivate}} expected-note{{defined as private}}
129  for (i = 0; i < argc; ++i) foo();
130
131#pragma omp target teams distribute firstprivate(i)
132  for (j = 0; j < argc; ++j) foo();
133
134#pragma omp target teams distribute firstprivate(i) // expected-note {{defined as firstprivate}}
135  for (i = 0; i < argc; ++i) foo(); // expected-error {{loop iteration variable in the associated loop of 'omp target teams distribute' directive may not be firstprivate, predetermined as private}}
136
137#pragma omp target teams distribute firstprivate(j)
138  for (i = 0; i < argc; ++i) foo();
139
140// expected-error@+1 {{lastprivate variable cannot be firstprivate}} expected-note@+1 {{defined as lastprivate}}
141#pragma omp target teams distribute lastprivate(argc), firstprivate(argc)
142  for (i = 0; i < argc; ++i) foo();
143
144  return 0;
145}
146
CodeThinker, Enjoy your reading code