Home | History | Annotate | Download | only in OpenMP
      1 // RUN: %clang_cc1 -verify -fopenmp %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 };
     18 const S2 b;
     19 const S2 ba[5];
     20 class S3 {
     21   int a;
     22 
     23 public:
     24   S3() : a(0) {}
     25 };
     26 const S3 ca[5];
     27 class S4 {
     28   int a;
     29   S4(); // expected-note {{implicitly declared private here}}
     30 
     31 public:
     32   S4(int v) : a(v) {
     33 #pragma omp single private(a) private(this->a)
     34     for (int k = 0; k < v; ++k)
     35       ++this->a;
     36   }
     37 };
     38 class S5 {
     39   int a;
     40   S5() : a(0) {} // expected-note {{implicitly declared private here}}
     41 
     42 public:
     43   S5(int v) : a(v) {}
     44   S5 &operator=(S5 &s) {
     45 #pragma omp single private(a) private(this->a) private(s.a) // expected-error {{expected variable name or data member of current class}}
     46     for (int k = 0; k < s.a; ++k)
     47       ++s.a;
     48     return *this;
     49   }
     50 };
     51 
     52 template <typename T>
     53 class S6 {
     54 public:
     55   T a;
     56 
     57   S6() : a(0) {}
     58   S6(T v) : a(v) {
     59 #pragma omp single private(a) private(this->a)
     60     for (int k = 0; k < v; ++k)
     61       ++this->a;
     62   }
     63   S6 &operator=(S6 &s) {
     64 #pragma omp single private(a) private(this->a) private(s.a) // expected-error {{expected variable name or data member of current class}}
     65     for (int k = 0; k < s.a; ++k)
     66       ++s.a;
     67     return *this;
     68   }
     69 };
     70 
     71 template <typename T>
     72 class S7 : public T {
     73   T a;
     74   S7() : a(0) {}
     75 
     76 public:
     77   S7(T v) : a(v) {
     78 #pragma omp single private(a) private(this->a) private(T::a)
     79     for (int k = 0; k < a.a; ++k)
     80       ++this->a.a;
     81   }
     82   S7 &operator=(S7 &s) {
     83 #pragma omp single private(a) private(this->a) private(s.a) private(s.T::a) // expected-error 2 {{expected variable name or data member of current class}}
     84     for (int k = 0; k < s.a.a; ++k)
     85       ++s.a.a;
     86     return *this;
     87   }
     88 };
     89 
     90 S3 h;
     91 #pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}}
     92 
     93 template <class I, class C>
     94 int foomain(I argc, C **argv) {
     95   I e(4);
     96   I g(5);
     97   int i;
     98   int &j = i;
     99 #pragma omp single private // expected-error {{expected '(' after 'private'}}
    100   foo();
    101 #pragma omp single private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
    102   foo();
    103 #pragma omp single private() // expected-error {{expected expression}}
    104   foo();
    105 #pragma omp single private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
    106   foo();
    107 #pragma omp single private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
    108   foo();
    109 #pragma omp single private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
    110   foo();
    111 #pragma omp single private(argc)
    112   foo();
    113 #pragma omp single private(S1) // expected-error {{'S1' does not refer to a value}}
    114   foo();
    115 #pragma omp single private(a, b) // expected-error {{private variable with incomplete type 'S1'}}
    116   foo();
    117 #pragma omp single private(argv[1]) // expected-error {{expected variable name}}
    118   foo();
    119 #pragma omp single private(e, g)
    120   foo();
    121 #pragma omp single private(h) // expected-error {{threadprivate or thread local variable cannot be private}}
    122   foo();
    123 #pragma omp single shared(i) // expected-error {{unexpected OpenMP clause 'shared' in directive '#pragma omp single'}}
    124   foo();
    125 #pragma omp parallel
    126   {
    127     int v = 0;
    128     int i;
    129 #pragma omp single private(i)
    130     foo();
    131     v += i;
    132   }
    133 #pragma omp parallel shared(i)
    134 #pragma omp parallel private(i)
    135 #pragma omp single private(j)
    136   foo();
    137 #pragma omp single private(i)
    138   foo();
    139   return 0;
    140 }
    141 
    142 namespace A {
    143 double x;
    144 #pragma omp threadprivate(x) // expected-note {{defined as threadprivate or thread local}}
    145 }
    146 namespace B {
    147 using A::x;
    148 }
    149 
    150 int main(int argc, char **argv) {
    151   S4 e(4);
    152   S5 g(5);
    153   S6<float> s6(0.0) , s6_0(1.0);
    154   S7<S6<float> > s7(0.0) , s7_0(1.0);
    155   int i;
    156   int &j = i;
    157 #pragma omp single private // expected-error {{expected '(' after 'private'}}
    158   foo();
    159 #pragma omp single private( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
    160   foo();
    161 #pragma omp single private() // expected-error {{expected expression}}
    162   foo();
    163 #pragma omp single private(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
    164   foo();
    165 #pragma omp single private(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
    166   foo();
    167 #pragma omp single private(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
    168   foo();
    169 #pragma omp single private(argc)
    170   foo();
    171 #pragma omp single private(S1) // expected-error {{'S1' does not refer to a value}}
    172   foo();
    173 #pragma omp single private(a, b) // expected-error {{private variable with incomplete type 'S1'}}
    174   foo();
    175 #pragma omp single private(argv[1]) // expected-error {{expected variable name}}
    176   foo();
    177 #pragma omp single private(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}
    178   foo();
    179 #pragma omp single private(h, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be private}}
    180   foo();
    181 #pragma omp single shared(i) // expected-error {{unexpected OpenMP clause 'shared' in directive '#pragma omp single'}}
    182   foo();
    183 #pragma omp parallel
    184   {
    185     int i;
    186 #pragma omp single private(i)
    187     foo();
    188   }
    189 #pragma omp parallel shared(i)
    190 #pragma omp parallel private(i)
    191 #pragma omp single private(j)
    192   foo();
    193 #pragma omp single private(i)
    194   foo();
    195   static int m;
    196 #pragma omp single private(m) // OK
    197   foo();
    198 
    199   s6 = s6_0; // expected-note {{in instantiation of member function 'S6<float>::operator=' requested here}}
    200   s7 = s7_0; // expected-note {{in instantiation of member function 'S7<S6<float> >::operator=' requested here}}
    201   return foomain(argc, argv); // expected-note {{in instantiation of function template specialization 'foomain<int, char>' requested here}}
    202 }
    203 
    204