Home | History | Annotate | Download | only in OpenMP 
      1 // RUN: %clang_cc1 -verify -fopenmp -ferror-limit 100 %s
      2 
      3 
      4 struct S1; // expected-note 2 {{declared here}}
      5 extern S1 a;
      6 class S2 {
      7   mutable int a;
      8 public:
      9   S2():a(0) { }
     10   S2(S2 &s2):a(s2.a) { }
     11 };
     12 const S2 b;
     13 const S2 ba[5];
     14 class S3 {
     15   int a;
     16 public:
     17   S3():a(0) { }
     18   S3(S3 &s3):a(s3.a) { }
     19 };
     20 const S3 c;
     21 const S3 ca[5];
     22 extern const int f;
     23 class S4 {
     24   int a;
     25   S4();
     26   S4(const S4 &s4);
     27 public:
     28   S4(int v):a(v) { }
     29 };
     30 class S5 {
     31   int a;
     32   S5():a(0) {}
     33   S5(const S5 &s5):a(s5.a) { }
     34 public:
     35   S5(int v):a(v) { }
     36 };
     37 
     38 S3 h;
     39 #pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}}
     40 
     41 namespace A {
     42 double x;
     43 #pragma omp threadprivate(x) // expected-note 2 {{defined as threadprivate or thread local}}
     44 }
     45 namespace B {
     46 using A::x;
     47 }
     48 
     49 template <class T, typename S, int N>
     50 T tmain(T argc, S **argv) {
     51   const int d = 5;
     52   const int da[5] = { 0 };
     53   S4 e(4);
     54   S5 g(5);
     55   int i;
     56   int &j = i;
     57   int acc = 0;
     58   int n = 1000;
     59 
     60 #pragma omp target
     61 #pragma omp teams
     62 #pragma omp distribute parallel for simd shared // expected-error {{expected '(' after 'shared'}}
     63   for(int k = 0 ; k < n ; k++) {
     64     acc++;
     65   }
     66 
     67 #pragma omp target
     68 #pragma omp teams
     69 #pragma omp distribute parallel for simd shared ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
     70   for(int k = 0 ; k < n ; k++) {
     71     acc++;
     72   }
     73 
     74 #pragma omp target
     75 #pragma omp teams
     76 #pragma omp distribute parallel for simd shared () // expected-error {{expected expression}}
     77   for(int k = 0 ; k < n ; k++) {
     78     acc++;
     79   }
     80 
     81 #pragma omp target
     82 #pragma omp teams
     83 #pragma omp distribute parallel for simd shared (argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
     84   for(int k = 0 ; k < n ; k++) {
     85     acc++;
     86   }
     87 
     88 #pragma omp target
     89 #pragma omp teams
     90 #pragma omp distribute parallel for simd shared (argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
     91   for(int k = 0 ; k < n ; k++) {
     92     acc++;
     93   }
     94 
     95 #pragma omp target
     96 #pragma omp teams
     97 #pragma omp distribute parallel for simd shared (argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
     98   for(int k = 0 ; k < n ; k++) {
     99     acc++;
    100   }
    101 
    102 #pragma omp target
    103 #pragma omp teams
    104 #pragma omp distribute parallel for simd shared (argc)
    105   for(int k = 0 ; k < n ; k++) {
    106     acc++;
    107   }
    108 
    109 #pragma omp target
    110 #pragma omp teams
    111 #pragma omp distribute parallel for simd shared (S1) // expected-error {{'S1' does not refer to a value}}
    112   for(int k = 0 ; k < n ; k++) {
    113     acc++;
    114   }
    115 
    116 #pragma omp target
    117 #pragma omp teams
    118 #pragma omp distribute parallel for simd shared (a, b, c, d, f)
    119   for(int k = 0 ; k < n ; k++) {
    120     acc++;
    121   }
    122 
    123 #pragma omp target
    124 #pragma omp teams
    125 #pragma omp distribute parallel for simd shared (argv[1]) // expected-error {{expected variable name}}
    126   for(int k = 0 ; k < n ; k++) {
    127     acc++;
    128   }
    129 
    130 #pragma omp target
    131 #pragma omp teams
    132 #pragma omp distribute parallel for simd shared(ba)
    133   for(int k = 0 ; k < n ; k++) {
    134     acc++;
    135   }
    136 
    137 #pragma omp target
    138 #pragma omp teams
    139 #pragma omp distribute parallel for simd shared(ca)
    140   for(int k = 0 ; k < n ; k++) {
    141     acc++;
    142   }
    143 
    144 #pragma omp target
    145 #pragma omp teams
    146 #pragma omp distribute parallel for simd shared(da)
    147   for(int k = 0 ; k < n ; k++) {
    148     acc++;
    149   }
    150 
    151 #pragma omp target
    152 #pragma omp teams
    153 #pragma omp distribute parallel for simd shared(e, g)
    154   for(int k = 0 ; k < n ; k++) {
    155     acc++;
    156   }
    157 
    158 #pragma omp target
    159 #pragma omp teams
    160 #pragma omp distribute parallel for simd shared(h, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be shared}}
    161   for(int k = 0 ; k < n ; k++) {
    162     acc++;
    163   }
    164 
    165 #pragma omp target
    166 #pragma omp teams
    167 #pragma omp distribute parallel for simd private(i), shared(i) // expected-error {{private variable cannot be shared}} expected-note {{defined as private}}
    168   for(int k = 0 ; k < n ; k++) {
    169     acc++;
    170   }
    171 
    172 #pragma omp target
    173 #pragma omp teams
    174 #pragma omp distribute parallel for simd firstprivate(i), shared(i) // expected-error {{firstprivate variable cannot be shared}} expected-note {{defined as firstprivate}}
    175   for(int k = 0 ; k < n ; k++) {
    176     acc++;
    177   }
    178 
    179 #pragma omp target
    180 #pragma omp teams
    181 #pragma omp distribute parallel for simd private(i)
    182   for(int k = 0 ; k < n ; k++) {
    183     acc++;
    184   }
    185 
    186 #pragma omp target
    187 #pragma omp teams
    188 #pragma omp distribute parallel for simd shared(i)
    189   for(int k = 0 ; k < n ; k++) {
    190     acc++;
    191   }
    192 
    193 #pragma omp target
    194 #pragma omp teams
    195 #pragma omp distribute parallel for simd shared(j)
    196   for(int k = 0 ; k < n ; k++) {
    197     acc++;
    198   }
    199 
    200 #pragma omp target
    201 #pragma omp teams
    202 #pragma omp distribute parallel for simd firstprivate(i)
    203   for(int k = 0 ; k < n ; k++) {
    204     acc++;
    205   }
    206 
    207 #pragma omp target
    208 #pragma omp teams
    209 #pragma omp distribute parallel for simd shared(i)
    210   for(int k = 0 ; k < n ; k++) {
    211     acc++;
    212   }
    213 
    214 #pragma omp target
    215 #pragma omp teams
    216 #pragma omp distribute parallel for simd shared(j)
    217   for(int k = 0 ; k < n ; k++) {
    218     acc++;
    219   }
    220 return T();
    221 }
    222 
    223 
    224 int main(int argc, char **argv) {
    225   const int d = 5;
    226   const int da[5] = { 0 };
    227   S4 e(4);
    228   S5 g(5);
    229   int i;
    230   int &j = i;
    231   int acc = 0;
    232   int n = argc;
    233 
    234 #pragma omp target
    235 #pragma omp teams
    236 #pragma omp distribute parallel for simd shared // expected-error {{expected '(' after 'shared'}}
    237   for(int k = 0 ; k < n ; k++) {
    238     acc++;
    239   }
    240 
    241 #pragma omp target
    242 #pragma omp teams
    243 #pragma omp distribute parallel for simd shared ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
    244   for(int k = 0 ; k < n ; k++) {
    245     acc++;
    246   }
    247 
    248 #pragma omp target
    249 #pragma omp teams
    250 #pragma omp distribute parallel for simd shared () // expected-error {{expected expression}}
    251   for(int k = 0 ; k < n ; k++) {
    252     acc++;
    253   }
    254 
    255 #pragma omp target
    256 #pragma omp teams
    257 #pragma omp distribute parallel for simd shared (argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
    258   for(int k = 0 ; k < n ; k++) {
    259     acc++;
    260   }
    261 
    262 #pragma omp target
    263 #pragma omp teams
    264 #pragma omp distribute parallel for simd shared (argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
    265   for(int k = 0 ; k < n ; k++) {
    266     acc++;
    267   }
    268 
    269 #pragma omp target
    270 #pragma omp teams
    271 #pragma omp distribute parallel for simd shared (argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
    272   for(int k = 0 ; k < n ; k++) {
    273     acc++;
    274   }
    275 
    276 #pragma omp target
    277 #pragma omp teams
    278 #pragma omp distribute parallel for simd shared (argc)
    279   for(int k = 0 ; k < n ; k++) {
    280     acc++;
    281   }
    282 
    283 #pragma omp target
    284 #pragma omp teams
    285 #pragma omp distribute parallel for simd shared (S1) // expected-error {{'S1' does not refer to a value}}
    286   for(int k = 0 ; k < n ; k++) {
    287     acc++;
    288   }
    289 
    290 #pragma omp target
    291 #pragma omp teams
    292 #pragma omp distribute parallel for simd shared (a, b, c, d, f)
    293   for(int k = 0 ; k < n ; k++) {
    294     acc++;
    295   }
    296 
    297 #pragma omp target
    298 #pragma omp teams
    299 #pragma omp distribute parallel for simd shared (argv[1]) // expected-error {{expected variable name}}
    300   for(int k = 0 ; k < n ; k++) {
    301     acc++;
    302   }
    303 
    304 #pragma omp target
    305 #pragma omp teams
    306 #pragma omp distribute parallel for simd shared(ba)
    307   for(int k = 0 ; k < n ; k++) {
    308     acc++;
    309   }
    310 
    311 #pragma omp target
    312 #pragma omp teams
    313 #pragma omp distribute parallel for simd shared(ca)
    314   for(int k = 0 ; k < n ; k++) {
    315     acc++;
    316   }
    317 
    318 #pragma omp target
    319 #pragma omp teams
    320 #pragma omp distribute parallel for simd shared(da)
    321   for(int k = 0 ; k < n ; k++) {
    322     acc++;
    323   }
    324 
    325 #pragma omp target
    326 #pragma omp teams
    327 #pragma omp distribute parallel for simd shared(e, g)
    328   for(int k = 0 ; k < n ; k++) {
    329     acc++;
    330   }
    331 
    332 #pragma omp target
    333 #pragma omp teams
    334 #pragma omp distribute parallel for simd shared(h, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be shared}}
    335   for(int k = 0 ; k < n ; k++) {
    336     acc++;
    337   }
    338 
    339 #pragma omp target
    340 #pragma omp teams
    341 #pragma omp distribute parallel for simd private(i), shared(i) // expected-error {{private variable cannot be shared}} expected-note {{defined as private}}
    342   for(int k = 0 ; k < n ; k++) {
    343     acc++;
    344   }
    345 
    346 #pragma omp target
    347 #pragma omp teams
    348 #pragma omp distribute parallel for simd firstprivate(i), shared(i) // expected-error {{firstprivate variable cannot be shared}} expected-note {{defined as firstprivate}}
    349   for(int k = 0 ; k < n ; k++) {
    350     acc++;
    351   }
    352 
    353 #pragma omp target
    354 #pragma omp teams
    355 #pragma omp distribute parallel for simd private(i)
    356   for(int k = 0 ; k < n ; k++) {
    357     acc++;
    358   }
    359 
    360 #pragma omp target
    361 #pragma omp teams
    362 #pragma omp distribute parallel for simd shared(i)
    363   for(int k = 0 ; k < n ; k++) {
    364     acc++;
    365   }
    366 
    367 #pragma omp target
    368 #pragma omp teams
    369 #pragma omp distribute parallel for simd shared(j)
    370   for(int k = 0 ; k < n ; k++) {
    371     acc++;
    372   }
    373 
    374 #pragma omp target
    375 #pragma omp teams
    376 #pragma omp distribute parallel for simd firstprivate(i)
    377   for(int k = 0 ; k < n ; k++) {
    378     acc++;
    379   }
    380 
    381 #pragma omp target
    382 #pragma omp teams
    383 #pragma omp distribute parallel for simd shared(i)
    384   for(int k = 0 ; k < n ; k++) {
    385     acc++;
    386   }
    387 
    388 #pragma omp target
    389 #pragma omp teams
    390 #pragma omp distribute parallel for simd shared(j)
    391   for(int k = 0 ; k < n ; k++) {
    392     acc++;
    393   }
    394 
    395 return tmain<int, char, 1000>(argc, argv); // expected-note {{in instantiation of function template specialization 'tmain<int, char, 1000>' requested here}}
    396 }
    397