clang/test/OpenMP/cancel_if_messages.cpp

   1 // RUN: %clang_cc1 -verify -fopenmp -fopenmp-version=45 -ferror-limit 100 %s -Wuninitialized
   2
   3 // RUN: %clang_cc1 -verify -fopenmp-simd -fopenmp-version=45 -ferror-limit 100 %s -Wuninitialized
   4
   5 // RUN: %clang_cc1 -verify -fopenmp -ferror-limit 100 %s -Wuninitialized
   6 // RUN: %clang_cc1 -verify -fopenmp-simd -ferror-limit 100 %s -Wuninitialized
   7
   8 void foo() {
   9 }
  10
  11 bool foobool(int argc) {
  12   return argc;
  13 }
  14
  15 void xxx(int argc) {
  16   int cond; // expected-note {{initialize the variable 'cond' to silence this warning}}
  17 #pragma omp parallel
  18   {
  19 #pragma omp cancel parallel if (cond) // expected-warning {{variable 'cond' is uninitialized when used here}}
  20     for (int i = 0; i < 10; ++i)
  21       ;
  22   }
  23 }
  24
  25 struct S1; // expected-note {{declared here}}
  26
  27 template <class T, class S> // expected-note {{declared here}}
  28 int tmain(T argc, S **argv) {
  29   T z;
  30   #pragma omp parallel
  31   {
  32     #pragma omp cancel parallel if // expected-error {{expected '(' after 'if'}}
  33     #pragma omp cancel parallel if ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  34     #pragma omp cancel parallel if () // expected-error {{expected expression}}
  35     #pragma omp cancel parallel if (argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
  36     #pragma omp cancel parallel if (argc)) // expected-warning {{extra tokens at the end of '#pragma omp cancel' are ignored}}
  37     #pragma omp cancel parallel if (argc > 0 ? argv[1] : argv[2] + z)
  38     #pragma omp cancel parallel if (foobool(argc)), if (true) // expected-error {{directive '#pragma omp cancel' cannot contain more than one 'if' clause}}
  39     #pragma omp cancel parallel if (S) // expected-error {{'S' does not refer to a value}}
  40     #pragma omp cancel parallel if (argv[1]=2) // expected-error {{expected ')'}} expected-note {{to match this '('}}
  41     #pragma omp cancel parallel if (argc argc) // expected-error {{expected ')'}} expected-note {{to match this '('}}
  42     #pragma omp cancel parallel if(argc)
  43     #pragma omp cancel parallel if(cancel // expected-error {{use of undeclared identifier 'cancel'}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  44     #pragma omp cancel parallel if(cancel : // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  45     #pragma omp cancel parallel if(cancel : argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
  46     #pragma omp cancel parallel if(cancel : argc)
  47     #pragma omp cancel parallel if(cancel : argc) if (for:argc) // expected-error {{directive name modifier 'for' is not allowed for '#pragma omp cancel'}}
  48     #pragma omp cancel parallel if(cancel : argc) if (cancel:argc) // expected-error {{directive '#pragma omp cancel' cannot contain more than one 'if' clause with 'cancel' name modifier}}
  49     #pragma omp cancel parallel if(cancel : argc) if (argc) // expected-error {{no more 'if' clause is allowed}} expected-note {{previous clause with directive name modifier specified here}}
  50     foo();
  51   }
  52
  53   return 0;
  54 }
  55
  56 int main(int argc, char **argv) {
  57 int z;
  58   #pragma omp parallel
  59   {
  60     #pragma omp cancel parallel if // expected-error {{expected '(' after 'if'}}
  61     #pragma omp cancel parallel if ( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  62     #pragma omp cancel parallel if () // expected-error {{expected expression}}
  63     #pragma omp cancel parallel if (argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
  64     #pragma omp cancel parallel if (argc)) // expected-warning {{extra tokens at the end of '#pragma omp cancel' are ignored}}
  65     #pragma omp cancel parallel if (argc > 0 ? argv[1] : argv[2] - z)
  66     #pragma omp cancel parallel if (foobool(argc)), if (true) // expected-error {{directive '#pragma omp cancel' cannot contain more than one 'if' clause}}
  67     #pragma omp cancel parallel if (S1) // expected-error {{'S1' does not refer to a value}}
  68     #pragma omp cancel parallel if (argv[1]=2) // expected-error {{expected ')'}} expected-note {{to match this '('}}
  69     #pragma omp cancel parallel if (argc argc) // expected-error {{expected ')'}} expected-note {{to match this '('}}
  70     #pragma omp cancel parallel if (1 0) // expected-error {{expected ')'}} expected-note {{to match this '('}}
  71     #pragma omp cancel parallel if(if(tmain(argc, argv) // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  72     #pragma omp cancel parallel if(cancel // expected-error {{use of undeclared identifier 'cancel'}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  73     #pragma omp cancel parallel if(cancel : // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  74     #pragma omp cancel parallel if(cancel : argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
  75     #pragma omp cancel parallel if(cancel : argc)
  76     #pragma omp cancel parallel if(cancel : argc) if (for:argc) // expected-error {{directive name modifier 'for' is not allowed for '#pragma omp cancel'}}
  77     #pragma omp cancel parallel if(cancel : argc) if (cancel:argc)  // expected-error {{directive '#pragma omp cancel' cannot contain more than one 'if' clause with 'cancel' name modifier}}
  78     #pragma omp cancel parallel if(cancel : argc) if (argc) // expected-error {{no more 'if' clause is allowed}} expected-note {{previous clause with directive name modifier specified here}}
  79     foo();
  80   }
  81
  82   return tmain(argc, argv);
  83 }