Clang Project

clang_source_code/test/OpenMP/teams_distribute_parallel_for_collapse_messages.cpp
1// RUN: %clang_cc1 -verify -fopenmp %s
2// RUN: %clang_cc1 -verify -fopenmp %s -std=c++98
3// RUN: %clang_cc1 -verify -fopenmp %s -std=c++11
4
5// RUN: %clang_cc1 -verify -fopenmp-simd %s
6// RUN: %clang_cc1 -verify -fopenmp-simd %s -std=c++98
7// RUN: %clang_cc1 -verify -fopenmp-simd %s -std=c++11
8
9void foo() {
10}
11
12#if __cplusplus >= 201103L
13// expected-note@+2 4 {{declared here}}
14#endif
15bool foobool(int argc) {
16  return argc;
17}
18
19struct S1; // expected-note {{declared here}}
20
21template <class T, typename S, int N, int ST> // expected-note {{declared here}}
22T tmain(T argc, S **argv) { //expected-note 2 {{declared here}}
23#pragma omp target
24#pragma omp teams distribute parallel for collapse // expected-error {{expected '(' after 'collapse'}}
25  for (int i = ST; i < N; i++)
26    argv[0][i] = argv[0][i] - argv[0][i-ST];
27
28#pragma omp target
29#pragma omp teams distribute parallel for collapse ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
30  for (int i = ST; i < N; i++)
31
32    argv[0][i] = argv[0][i] - argv[0][i-ST];
33#pragma omp target
34#pragma omp teams distribute parallel for collapse () // expected-error {{expected expression}}
35  for (int i = ST; i < N; i++)
36    argv[0][i] = argv[0][i] - argv[0][i-ST];
37
38// expected-error@+4 {{expected ')'}} expected-note@+4 {{to match this '('}}
39// expected-error@+3 2 {{expression is not an integral constant expression}}
40// expected-note@+2 2 {{read of non-const variable 'argc' is not allowed in a constant expression}}
41#pragma omp target
42#pragma omp teams distribute parallel for collapse (argc 
43  for (int i = ST; i < N; i++)
44    argv[0][i] = argv[0][i] - argv[0][i-ST];
45
46// expected-error@+2 2 {{argument to 'collapse' clause must be a strictly positive integer value}}
47#pragma omp target
48#pragma omp teams distribute parallel for collapse (ST // expected-error {{expected ')'}} expected-note {{to match this '('}}
49  for (int i = ST; i < N; i++)
50    argv[0][i] = argv[0][i] - argv[0][i-ST];
51
52#pragma omp target
53#pragma omp teams distribute parallel for collapse (1)) // expected-warning {{extra tokens at the end of '#pragma omp teams distribute parallel for' are ignored}}
54  for (int i = ST; i < N; i++)
55    argv[0][i] = argv[0][i] - argv[0][i-ST];
56
57#pragma omp target
58#pragma omp teams distribute parallel for collapse ((ST > 0) ? 1 + ST : 2) // expected-note 2 {{as specified in 'collapse' clause}}
59  for (int i = ST; i < N; i++)
60    argv[0][i] = argv[0][i] - argv[0][i-ST]; // expected-error 2 {{expected 2 for loops after '#pragma omp teams distribute parallel for', but found only 1}}
61
62#if __cplusplus >= 201103L
63// expected-note@+6 2 {{non-constexpr function 'foobool' cannot be used}}
64#endif
65// expected-error@+4 2 {{directive '#pragma omp teams distribute parallel for' cannot contain more than one 'collapse' clause}}
66// expected-error@+3 2 {{argument to 'collapse' clause must be a strictly positive integer value}}
67// expected-error@+2 2 {{expression is not an integral constant expression}}
68#pragma omp target
69#pragma omp teams distribute parallel for collapse (foobool(argc)), collapse (true), collapse (-5)
70  for (int i = ST; i < N; i++)
71    argv[0][i] = argv[0][i] - argv[0][i-ST];
72
73#pragma omp distribute collapse (S) // expected-error {{'S' does not refer to a value}}
74  for (int i = ST; i < N; i++)
75    argv[0][i] = argv[0][i] - argv[0][i-ST];
76
77#if __cplusplus >= 201103L
78// expected-error@+5 2 {{integral constant expression must have integral or unscoped enumeration type}}
79#else
80// expected-error@+3 2 {{expression is not an integral constant expression}}
81#endif
82#pragma omp target
83#pragma omp teams distribute parallel for collapse (argv[1]=2) // expected-error {{expected ')'}} expected-note {{to match this '('}}
84  for (int i = ST; i < N; i++)
85    argv[0][i] = argv[0][i] - argv[0][i-ST];
86
87#pragma omp target
88#pragma omp teams distribute parallel for collapse (1)
89  for (int i = ST; i < N; i++)
90    argv[0][i] = argv[0][i] - argv[0][i-ST];
91
92#pragma omp target
93#pragma omp teams distribute parallel for collapse (N) // expected-error {{argument to 'collapse' clause must be a strictly positive integer value}}
94  for (T i = ST; i < N; i++)
95    argv[0][i] = argv[0][i] - argv[0][i-ST];
96
97#pragma omp target
98#pragma omp teams distribute parallel for collapse (2) // expected-note {{as specified in 'collapse' clause}}
99  foo(); // expected-error {{expected 2 for loops after '#pragma omp teams distribute parallel for'}}
100  return argc;
101}
102
103int main(int argc, char **argv) {
104#pragma omp target
105#pragma omp teams distribute parallel for collapse // expected-error {{expected '(' after 'collapse'}}
106  for (int i = 4; i < 12; i++)
107    argv[0][i] = argv[0][i] - argv[0][i-4];
108
109#pragma omp target
110#pragma omp teams distribute parallel for collapse ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
111  for (int i = 4; i < 12; i++)
112    argv[0][i] = argv[0][i] - argv[0][i-4];
113
114#pragma omp target
115#pragma omp teams distribute parallel for collapse () // expected-error {{expected expression}}
116  for (int i = 4; i < 12; i++)
117    argv[0][i] = argv[0][i] - argv[0][i-4];
118
119#pragma omp target
120#pragma omp teams distribute parallel for collapse (4 // expected-error {{expected ')'}} expected-note {{to match this '('}} expected-note {{as specified in 'collapse' clause}}
121  for (int i = 4; i < 12; i++)
122    argv[0][i] = argv[0][i] - argv[0][i-4]; // expected-error {{expected 4 for loops after '#pragma omp teams distribute parallel for', but found only 1}}
123
124#pragma omp target
125#pragma omp teams distribute parallel for collapse (2+2)) // expected-warning {{extra tokens at the end of '#pragma omp teams distribute parallel for' are ignored}}  expected-note {{as specified in 'collapse' clause}}
126  for (int i = 4; i < 12; i++)
127    argv[0][i] = argv[0][i] - argv[0][i-4]; // expected-error {{expected 4 for loops after '#pragma omp teams distribute parallel for', but found only 1}}
128
129#if __cplusplus >= 201103L
130// expected-note@+3 {{non-constexpr function 'foobool' cannot be used}}
131#endif
132#pragma omp target
133#pragma omp teams distribute parallel for collapse (foobool(1) > 0 ? 1 : 2) // expected-error {{expression is not an integral constant expression}}
134  for (int i = 4; i < 12; i++)
135    argv[0][i] = argv[0][i] - argv[0][i-4];
136
137#if __cplusplus >= 201103L
138// expected-note@+6 {{non-constexpr function 'foobool' cannot be used}}
139#endif
140// expected-error@+4 {{expression is not an integral constant expression}}
141// expected-error@+3 2 {{directive '#pragma omp teams distribute parallel for' cannot contain more than one 'collapse' clause}}
142// expected-error@+2 2 {{argument to 'collapse' clause must be a strictly positive integer value}}
143#pragma omp target
144#pragma omp teams distribute parallel for collapse (foobool(argc)), collapse (true), collapse (-5) 
145  for (int i = 4; i < 12; i++)
146    argv[0][i] = argv[0][i] - argv[0][i-4];
147
148#pragma omp target
149#pragma omp teams distribute parallel for collapse (S1) // expected-error {{'S1' does not refer to a value}}
150  for (int i = 4; i < 12; i++)
151    argv[0][i] = argv[0][i] - argv[0][i-4];
152
153#if __cplusplus >= 201103L
154// expected-error@+5 {{integral constant expression must have integral or unscoped enumeration type}}
155#else
156// expected-error@+3 {{expression is not an integral constant expression}}
157#endif
158#pragma omp target
159#pragma omp teams distribute parallel for collapse (argv[1]=2) // expected-error {{expected ')'}} expected-note {{to match this '('}}
160  for (int i = 4; i < 12; i++)
161    argv[0][i] = argv[0][i] - argv[0][i-4];
162
163// expected-error@+4 {{statement after '#pragma omp teams distribute parallel for' must be a for loop}}
164// expected-note@+2 {{in instantiation of function template specialization 'tmain<int, char, -1, -2>' requested here}}
165#pragma omp target
166#pragma omp teams distribute parallel for collapse(collapse(tmain<int, char, -1, -2>(argc, argv) // expected-error 2 {{expected ')'}} expected-note 2 {{to match this '('}}
167  foo();
168
169#pragma omp target
170#pragma omp teams distribute parallel for collapse (2) // expected-note {{as specified in 'collapse' clause}}
171  foo(); // expected-error {{expected 2 for loops after '#pragma omp teams distribute parallel for'}}
172
173// expected-note@+1 {{in instantiation of function template specialization 'tmain<int, char, 1, 0>' requested here}}
174  return tmain<int, char, 1, 0>(argc, argv);
175}
176
177
CodeThinker, Enjoy your reading code