brintos

brintos / llvm-project-archived public Read only

0
0
Text · 11.0 KiB · b728f35 Raw
302 lines · cpp
1// RUN: %clang_cc1 -verify=expected,omp45 -fopenmp-version=45 -fopenmp %s -Wuninitialized2// RUN: %clang_cc1 -verify=expected,omp50 -fopenmp %s -Wuninitialized3 4// RUN: %clang_cc1 -verify=expected,omp45 -fopenmp-version=45 -fopenmp-simd %s -Wuninitialized5// RUN: %clang_cc1 -verify=expected,omp50 -fopenmp-simd %s -Wuninitialized6 7extern int omp_default_mem_alloc;8void foo() {9}10 11bool foobool(int argc) {12  return argc;13}14 15struct S1; // expected-note 2 {{declared here}} expected-note 2 {{forward declaration of 'S1'}}16extern S1 a;17class S2 {18  mutable int a;19 20public:21  S2() : a(0) {}22  S2(S2 &s2) : a(s2.a) {}23  const S2 &operator =(const S2&) const;24  S2 &operator =(const S2&);25  static float S2s; // expected-note {{static data member is predetermined as shared}}26  static const float S2sc; // expected-note {{'S2sc' declared here}}27};28const float S2::S2sc = 0;29const S2 b;30const S2 ba[5];31class S3 {32  int a;33  S3 &operator=(const S3 &s3); // expected-note 2 {{implicitly declared private here}}34 35public:36  S3() : a(0) {}37  S3(S3 &s3) : a(s3.a) {}38};39const S3 c;         // expected-note {{'c' defined here}}40const S3 ca[5];     // expected-note {{'ca' defined here}}41extern const int f; // expected-note {{'f' declared here}}42class S4 {43  int a;44  S4();             // expected-note 3 {{implicitly declared private here}}45  S4(const S4 &s4);46 47public:48  S4(int v) : a(v) {}49};50class S5 {51  int a;52  S5() : a(0) {} // expected-note {{implicitly declared private here}}53 54public:55  S5(const S5 &s5) : a(s5.a) {}56  S5(int v) : a(v) {}57};58class S6 {59  int a;60  S6() : a(0) {} // omp45-note 2 {{implicitly declared private here}}61 62public:63  S6(const S6 &s6) : a(s6.a) {}64  S6(int v) : a(v) {}65};66 67S3 h;68#pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}}69 70template <class I, class C>71int foomain(int argc, char **argv) {72  I e(4);73  I g(5);74  int i, k;75  int &j = i;76  S6 s(0); // omp50-note {{'s' defined here}}77#pragma omp parallel78#pragma omp for lastprivate // expected-error {{expected '(' after 'lastprivate'}}79  for (int k = 0; k < argc; ++k)80    ++k;81#pragma omp parallel82#pragma omp for lastprivate( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}83  for (int k = 0; k < argc; ++k)84    ++k;85#pragma omp parallel86#pragma omp for lastprivate() // expected-error {{expected expression}}87  for (int k = 0; k < argc; ++k)88    ++k;89#pragma omp parallel90#pragma omp for lastprivate(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}91  for (int k = 0; k < argc; ++k)92    ++k;93#pragma omp parallel94#pragma omp for lastprivate(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}95  for (int k = 0; k < argc; ++k)96    ++k;97#pragma omp parallel98#pragma omp for lastprivate(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}99  for (int k = 0; k < argc; ++k)100    ++k;101#pragma omp parallel102#pragma omp for lastprivate(argc) allocate , allocate(, allocate(omp_default , allocate(omp_default_mem_alloc, allocate(omp_default_mem_alloc:, allocate(omp_default_mem_alloc: argc, allocate(omp_default_mem_alloc: argv), allocate(argv) // expected-error {{expected '(' after 'allocate'}} expected-error 2 {{expected expression}} expected-error 2 {{expected ')'}} expected-error {{use of undeclared identifier 'omp_default'}} expected-note 2 {{to match this '('}}103  for (int k = 0; k < argc; ++k)104    ++k;105#pragma omp parallel106#pragma omp for lastprivate(S1) // expected-error {{'S1' does not refer to a value}}107  for (int k = 0; k < argc; ++k)108    ++k;109#pragma omp parallel110#pragma omp for lastprivate(foo:argc) // omp50-error {{expected 'conditional' in OpenMP clause 'lastprivate'}} omp45-error {{expected ',' or ')' in 'lastprivate' clause}} omp45-error {{expected ')'}} omp45-error {{expected variable name}} omp45-note {{to match this '('}}111  for (int k = 0; k < argc; ++k)112    ++k;113#pragma omp parallel114#pragma omp for lastprivate(conditional: argc,s) lastprivate(conditional: // omp45-error 2 {{use of undeclared identifier 'conditional'}} omp50-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}} omp45-error 2 {{calling a private constructor of class 'S6'}} omp50-error {{expected list item of scalar type in 'lastprivate' clause with 'conditional' modifier}}115  for (int k = 0; k < argc; ++k)116    ++k;117#pragma omp parallel118#pragma omp for lastprivate(a, b) // expected-error {{lastprivate variable with incomplete type 'S1'}}119  for (int k = 0; k < argc; ++k)120    ++k;121#pragma omp parallel122#pragma omp for lastprivate(argv[1]) // expected-error {{expected variable name}}123  for (int k = 0; k < argc; ++k)124    ++k;125#pragma omp parallel126#pragma omp for lastprivate(k, e, g) // expected-error 2 {{calling a private constructor of class 'S4'}}127  for (int k = 0; k < argc; ++k)128    ++k;129#pragma omp parallel130#pragma omp for lastprivate(h) // expected-error {{threadprivate or thread local variable cannot be lastprivate}}131  for (int k = 0; k < argc; ++k)132    ++k;133#pragma omp parallel134  {135    int v = 0;136    int i;                     // expected-note {{variable with automatic storage duration is predetermined as private; perhaps you forget to enclose 'omp for' directive into a parallel or another task region?}}137#pragma omp for lastprivate(i) // expected-error {{lastprivate variable must be shared}}138    for (int k = 0; k < argc; ++k) {139      i = k;140      v += i;141    }142  }143#pragma omp parallel shared(i)144#pragma omp parallel private(i)145#pragma omp for lastprivate(j)146  for (int k = 0; k < argc; ++k)147    ++k;148#pragma omp parallel149#pragma omp for lastprivate(i)150  for (int k = 0; k < argc; ++k)151    ++k;152  return 0;153}154 155void bar(S4 a[2]) {156#pragma omp parallel157#pragma omp for lastprivate(a)158  for (int i = 0; i < 2; ++i)159    foo();160}161 162namespace A {163double x;164#pragma omp threadprivate(x) // expected-note {{defined as threadprivate or thread local}}165}166namespace B {167using A::x;168}169 170int main(int argc, char **argv) {171  const int d = 5;       // expected-note {{'d' defined here}}172  const int da[5] = {0}; // expected-note {{'da' defined here}}173  S4 e(4);174  S5 g(5);175  S3 m;176  S6 n(2);177  int i, k;178  int &j = i;179#pragma omp parallel180#pragma omp for lastprivate // expected-error {{expected '(' after 'lastprivate'}}181  for (i = 0; i < argc; ++i)182    foo();183#pragma omp parallel184#pragma omp for lastprivate( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}185  for (i = 0; i < argc; ++i)186    foo();187#pragma omp parallel188#pragma omp for lastprivate() // expected-error {{expected expression}}189  for (i = 0; i < argc; ++i)190    foo();191#pragma omp parallel192#pragma omp for lastprivate(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}193  for (i = 0; i < argc; ++i)194    foo();195#pragma omp parallel196#pragma omp for lastprivate(argc, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}197  for (i = 0; i < argc; ++i)198    foo();199#pragma omp parallel200#pragma omp for lastprivate(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}201  for (i = 0; i < argc; ++i)202    foo();203#pragma omp parallel204#pragma omp for lastprivate(argc, k)205  for (i = 0; i < argc; ++i)206    foo();207#pragma omp parallel208#pragma omp for lastprivate(S1) // expected-error {{'S1' does not refer to a value}}209  for (i = 0; i < argc; ++i)210    foo();211#pragma omp parallel212#pragma omp for lastprivate(a, b, c, d, f) // expected-error {{lastprivate variable with incomplete type 'S1'}} expected-error 1 {{const-qualified variable without mutable fields cannot be lastprivate}} expected-error 2 {{const-qualified variable cannot be lastprivate}}213  for (i = 0; i < argc; ++i)214    foo();215#pragma omp parallel216#pragma omp for lastprivate(argv[1]) // expected-error {{expected variable name}}217  for (i = 0; i < argc; ++i)218    foo();219#pragma omp parallel220#pragma omp for lastprivate(2 * 2) // expected-error {{expected variable name}}221  for (i = 0; i < argc; ++i)222    foo();223#pragma omp parallel224#pragma omp for lastprivate(ba)225  for (i = 0; i < argc; ++i)226    foo();227#pragma omp parallel228#pragma omp for lastprivate(ca) // expected-error {{const-qualified variable without mutable fields cannot be lastprivate}}229  for (i = 0; i < argc; ++i)230    foo();231#pragma omp parallel232#pragma omp for lastprivate(da) // expected-error {{const-qualified variable cannot be lastprivate}}233  for (i = 0; i < argc; ++i)234    foo();235  int xa;236#pragma omp parallel237#pragma omp for lastprivate(xa) // OK238  for (i = 0; i < argc; ++i)239    foo();240#pragma omp parallel241#pragma omp for lastprivate(S2::S2s) // expected-error {{shared variable cannot be lastprivate}}242  for (i = 0; i < argc; ++i)243    foo();244#pragma omp parallel245#pragma omp for lastprivate(S2::S2sc) // expected-error {{const-qualified variable cannot be lastprivate}}246  for (i = 0; i < argc; ++i)247    foo();248#pragma omp parallel249#pragma omp for safelen(5) // expected-error {{unexpected OpenMP clause 'safelen' in directive '#pragma omp for'}}250  for (i = 0; i < argc; ++i)251    foo();252#pragma omp parallel253#pragma omp for lastprivate(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}254  for (i = 0; i < argc; ++i)255    foo();256#pragma omp parallel257#pragma omp for lastprivate(m) // expected-error {{'operator=' is a private member of 'S3'}}258  for (i = 0; i < argc; ++i)259    foo();260#pragma omp parallel261#pragma omp for lastprivate(h) // expected-error {{threadprivate or thread local variable cannot be lastprivate}}262  for (i = 0; i < argc; ++i)263    foo();264#pragma omp parallel265#pragma omp for lastprivate(B::x) // expected-error {{threadprivate or thread local variable cannot be lastprivate}}266  for (i = 0; i < argc; ++i)267    foo();268#pragma omp parallel269#pragma omp for private(xa), lastprivate(xa) // expected-error {{private variable cannot be lastprivate}} expected-note {{defined as private}}270  for (i = 0; i < argc; ++i)271    foo();272#pragma omp parallel273#pragma omp for lastprivate(i)274  for (i = 0; i < argc; ++i)275    foo();276#pragma omp parallel private(xa) // expected-note {{defined as private}}277#pragma omp for lastprivate(xa)  // expected-error {{lastprivate variable must be shared}}278  for (i = 0; i < argc; ++i)279    foo();280#pragma omp parallel reduction(+ : xa) // expected-note {{defined as reduction}}281#pragma omp for lastprivate(xa)        // expected-error {{lastprivate variable must be shared}}282  for (i = 0; i < argc; ++i)283    foo();284#pragma omp parallel285#pragma omp for lastprivate(j)286  for (i = 0; i < argc; ++i)287    foo();288#pragma omp parallel289#pragma omp for firstprivate(m) lastprivate(m) // expected-error {{'operator=' is a private member of 'S3'}}290  for (i = 0; i < argc; ++i)291    foo();292#pragma omp parallel293#pragma omp for lastprivate(n) firstprivate(n) // OK294  for (i = 0; i < argc; ++i)295    foo();296  static int si;297#pragma omp for lastprivate(si) // OK298  for (i = 0; i < argc; ++i)299    si = i + 1;300  return foomain<S4, S5>(argc, argv); // expected-note {{in instantiation of function template specialization 'foomain<S4, S5>' requested here}}301}302