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