Home | History | Annotate | Download | only in OpenMP
      1 // RUN: %clang_cc1 -verify -fopenmp=libiomp5 %s
      2 
      3 void foo() {
      4 }
      5 
      6 bool foobool(int argc) {
      7   return argc;
      8 }
      9 
     10 struct S1; // expected-note 2 {{declared here}} expected-note 2 {{forward declaration of 'S1'}}
     11 extern S1 a;
     12 class S2 {
     13   mutable int a;
     14 
     15 public:
     16   S2() : a(0) {}
     17   S2(S2 &s2) : a(s2.a) {}
     18   static float S2s;
     19   static const float S2sc;
     20 };
     21 const float S2::S2sc = 0;
     22 const S2 b;
     23 const S2 ba[5];
     24 class S3 {
     25   int a;
     26   S3 &operator=(const S3 &s3);
     27 
     28 public:
     29   S3() : a(0) {}
     30   S3(S3 &s3) : a(s3.a) {}
     31 };
     32 const S3 c;
     33 const S3 ca[5];
     34 extern const int f;
     35 class S4 { // expected-note 2 {{'S4' declared here}}
     36   int a;
     37   S4();
     38   S4(const S4 &s4);
     39 
     40 public:
     41   S4(int v) : a(v) {}
     42 };
     43 class S5 { // expected-note 4 {{'S5' declared here}}
     44   int a;
     45   S5(const S5 &s5) : a(s5.a) {}
     46 
     47 public:
     48   S5() : a(0) {}
     49   S5(int v) : a(v) {}
     50 };
     51 class S6 {
     52   int a;
     53   S6() : a(0) {}
     54 
     55 public:
     56   S6(const S6 &s6) : a(s6.a) {}
     57   S6(int v) : a(v) {}
     58 };
     59 
     60 S3 h;
     61 #pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}}
     62 
     63 template <class I, class C>
     64 int foomain(int argc, char **argv) {
     65   I e(4); // expected-note {{'e' defined here}}
     66   C g(5); // expected-note 2 {{'g' defined here}}
     67   int i;
     68   int &j = i; // expected-note {{'j' defined here}}
     69 #pragma omp parallel
     70 #pragma omp sections firstprivate // expected-error {{expected '(' after 'firstprivate'}}
     71   {
     72     foo();
     73   }
     74 #pragma omp parallel
     75 #pragma omp sections firstprivate( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
     76   {
     77     foo();
     78   }
     79 #pragma omp parallel
     80 #pragma omp sections firstprivate() // expected-error {{expected expression}}
     81   {
     82     foo();
     83   }
     84 #pragma omp parallel
     85 #pragma omp sections firstprivate(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
     86   {
     87     foo();
     88   }
     89 #pragma omp parallel
     90 #pragma omp sections firstprivate(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
     91   {
     92     foo();
     93   }
     94 #pragma omp parallel
     95 #pragma omp sections firstprivate(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
     96   {
     97     foo();
     98   }
     99 #pragma omp parallel
    100 #pragma omp sections firstprivate(argc)
    101   {
    102     foo();
    103   }
    104 #pragma omp parallel
    105 #pragma omp sections firstprivate(S1) // expected-error {{'S1' does not refer to a value}}
    106   {
    107     foo();
    108   }
    109 #pragma omp parallel
    110 #pragma omp sections firstprivate(a, b) // expected-error {{firstprivate variable with incomplete type 'S1'}}
    111   {
    112     foo();
    113   }
    114 #pragma omp parallel
    115 #pragma omp sections firstprivate(argv[1]) // expected-error {{expected variable name}}
    116   {
    117     foo();
    118   }
    119 #pragma omp parallel
    120 #pragma omp sections firstprivate(e, g) // expected-error 2 {{firstprivate variable must have an accessible, unambiguous copy constructor}}
    121   {
    122     foo();
    123   }
    124 #pragma omp parallel
    125 #pragma omp sections firstprivate(h) // expected-error {{threadprivate or thread local variable cannot be firstprivate}}
    126   {
    127     foo();
    128   }
    129 #pragma omp parallel
    130 #pragma omp sections linear(i) // expected-error {{unexpected OpenMP clause 'linear' in directive '#pragma omp sections'}}
    131   {
    132     foo();
    133   }
    134 #pragma omp parallel
    135   {
    136     int v = 0;
    137     int i;                           // expected-note {{variable with automatic storage duration is predetermined as private; perhaps you forget to enclose 'omp sections' directive into a parallel or another task region?}}
    138 #pragma omp sections firstprivate(i) // expected-error {{private variable cannot be firstprivate}}
    139     {
    140       foo();
    141     }
    142     v += i;
    143   }
    144 #pragma omp parallel shared(i)
    145 #pragma omp parallel private(i)
    146 #pragma omp sections firstprivate(j) // expected-error {{arguments of OpenMP clause 'firstprivate' cannot be of reference type}}
    147   {
    148     foo();
    149   }
    150 #pragma omp parallel
    151 #pragma omp sections firstprivate(i)
    152   {
    153     foo();
    154   }
    155 #pragma omp parallel
    156 #pragma omp sections lastprivate(g) firstprivate(g) // expected-error {{firstprivate variable must have an accessible, unambiguous copy constructor}}
    157   {
    158     foo();
    159   }
    160 #pragma omp parallel private(i)      // expected-note {{defined as private}}
    161 #pragma omp sections firstprivate(i) // expected-error {{firstprivate variable must be shared}}
    162   {
    163     foo();
    164   }
    165 #pragma omp parallel reduction(+ : i) // expected-note {{defined as reduction}}
    166 #pragma omp sections firstprivate(i)  // expected-error {{firstprivate variable must be shared}}
    167   {
    168     foo();
    169   }
    170   return 0;
    171 }
    172 
    173 int main(int argc, char **argv) {
    174   const int d = 5;
    175   const int da[5] = {0};
    176   S4 e(4); // expected-note {{'e' defined here}}
    177   S5 g(5); // expected-note 2 {{'g' defined here}}
    178   S3 m;
    179   S6 n(2);
    180   int i;
    181   int &j = i; // expected-note {{'j' defined here}}
    182 #pragma omp parallel
    183 #pragma omp sections firstprivate // expected-error {{expected '(' after 'firstprivate'}}
    184   {
    185     foo();
    186   }
    187 #pragma omp parallel
    188 #pragma omp sections firstprivate( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
    189   {
    190     foo();
    191   }
    192 #pragma omp parallel
    193 #pragma omp sections firstprivate() // expected-error {{expected expression}}
    194   {
    195     foo();
    196   }
    197 #pragma omp parallel
    198 #pragma omp sections firstprivate(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
    199   {
    200     foo();
    201   }
    202 #pragma omp parallel
    203 #pragma omp sections firstprivate(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
    204   {
    205     foo();
    206   }
    207 #pragma omp parallel
    208 #pragma omp sections firstprivate(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
    209   {
    210     foo();
    211   }
    212 #pragma omp parallel
    213 #pragma omp sections firstprivate(argc)
    214   {
    215     foo();
    216   }
    217 #pragma omp parallel
    218 #pragma omp sections firstprivate(S1) // expected-error {{'S1' does not refer to a value}}
    219   {
    220     foo();
    221   }
    222 #pragma omp parallel
    223 #pragma omp sections firstprivate(a, b, c, d, f) // expected-error {{firstprivate variable with incomplete type 'S1'}}
    224   {
    225     foo();
    226   }
    227 #pragma omp parallel
    228 #pragma omp sections firstprivate(argv[1]) // expected-error {{expected variable name}}
    229   {
    230     foo();
    231   }
    232 #pragma omp parallel
    233 #pragma omp sections firstprivate(2 * 2) // expected-error {{expected variable name}}
    234   {
    235     foo();
    236   }
    237 #pragma omp parallel
    238 #pragma omp sections firstprivate(ba) // OK
    239   {
    240     foo();
    241   }
    242 #pragma omp parallel
    243 #pragma omp sections firstprivate(ca) // OK
    244   {
    245     foo();
    246   }
    247 #pragma omp parallel
    248 #pragma omp sections firstprivate(da) // OK
    249   {
    250     foo();
    251   }
    252   int xa;
    253 #pragma omp parallel
    254 #pragma omp sections firstprivate(xa) // OK
    255   {
    256     foo();
    257   }
    258 #pragma omp parallel
    259 #pragma omp sections firstprivate(S2::S2s) // OK
    260   {
    261     foo();
    262   }
    263 #pragma omp parallel
    264 #pragma omp sections firstprivate(S2::S2sc) // OK
    265   {
    266     foo();
    267   }
    268 #pragma omp parallel
    269 #pragma omp sections safelen(5) // expected-error {{unexpected OpenMP clause 'safelen' in directive '#pragma omp sections'}}
    270   {
    271     foo();
    272   }
    273 #pragma omp parallel
    274 #pragma omp sections firstprivate(e, g) // expected-error 2 {{firstprivate variable must have an accessible, unambiguous copy constructor}}
    275   {
    276     foo();
    277   }
    278 #pragma omp parallel
    279 #pragma omp sections firstprivate(m) // OK
    280   {
    281     foo();
    282   }
    283 #pragma omp parallel
    284 #pragma omp sections firstprivate(h) // expected-error {{threadprivate or thread local variable cannot be firstprivate}}
    285   {
    286     foo();
    287   }
    288 #pragma omp parallel
    289 #pragma omp sections private(xa), firstprivate(xa) // expected-error {{private variable cannot be firstprivate}} expected-note {{defined as private}}
    290   {
    291     foo();
    292   }
    293 #pragma omp parallel shared(xa)
    294 #pragma omp sections firstprivate(xa) // OK: may be firstprivate
    295   {
    296     foo();
    297   }
    298 #pragma omp parallel
    299 #pragma omp sections firstprivate(j) // expected-error {{arguments of OpenMP clause 'firstprivate' cannot be of reference type}}
    300   {
    301     foo();
    302   }
    303 #pragma omp parallel
    304 #pragma omp sections lastprivate(g) firstprivate(g) // expected-error {{firstprivate variable must have an accessible, unambiguous copy constructor}}
    305   {
    306     foo();
    307   }
    308 #pragma omp parallel
    309 #pragma omp sections lastprivate(n) firstprivate(n) // OK
    310   {
    311     foo();
    312   }
    313 #pragma omp parallel
    314   {
    315     int v = 0;
    316     int i;                           // expected-note {{variable with automatic storage duration is predetermined as private; perhaps you forget to enclose 'omp sections' directive into a parallel or another task region?}}
    317 #pragma omp sections firstprivate(i) // expected-error {{private variable cannot be firstprivate}}
    318     {
    319       foo();
    320     }
    321     v += i;
    322   }
    323 #pragma omp parallel private(i)      // expected-note {{defined as private}}
    324 #pragma omp sections firstprivate(i) // expected-error {{firstprivate variable must be shared}}
    325   {
    326     foo();
    327   }
    328 #pragma omp parallel reduction(+ : i) // expected-note {{defined as reduction}}
    329 #pragma omp sections firstprivate(i)  // expected-error {{firstprivate variable must be shared}}
    330   {
    331     foo();
    332   }
    333 
    334   return foomain<S4, S5>(argc, argv); // expected-note {{in instantiation of function template specialization 'foomain<S4, S5>' requested here}}
    335 }
    336