test/OpenMP/teams_distribute_dist_schedule_messages.cpp

   1 // RUN: %clang_cc1 -verify -fopenmp %s
   2
   3 // RUN: %clang_cc1 -verify -fopenmp-simd %s
   4
   5 void foo() {
   6 }
   7
   8 bool foobool(int argc) {
   9   return argc;
  10 }
  11
  12 struct S1; // expected-note {{declared here}} expected-note {{declared here}}
  13
  14 template <class T, int N>
  15 T tmain(T argc) {
  16   T b = argc, c, d, e, f, g;
  17   char ** argv;
  18   static T a;
  19 // CHECK: static T a;
  20
  21 #pragma omp target
  22 #pragma omp teams distribute dist_schedule // expected-error {{expected '(' after 'dist_schedule'}}
  23   for (int i = 0; i < 10; ++i) foo();
  24
  25 #pragma omp target
  26 #pragma omp teams distribute dist_schedule ( // expected-error {{expected 'static' in OpenMP clause 'dist_schedule'}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  27   for (int i = 0; i < 10; ++i) foo();
  28
  29 #pragma omp target
  30 #pragma omp teams distribute dist_schedule () // expected-error {{expected 'static' in OpenMP clause 'dist_schedule'}}
  31   for (int i = 0; i < 10; ++i) foo();
  32
  33 #pragma omp target
  34 #pragma omp teams distribute dist_schedule (static // expected-error {{expected ')'}} expected-note {{to match this '('}}
  35   for (int i = 0; i < 10; ++i) foo();
  36
  37 #pragma omp target
  38 #pragma omp teams distribute dist_schedule (static, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  39   for (int i = 0; i < 10; ++i) foo();
  40
  41 #pragma omp target
  42 #pragma omp teams distribute dist_schedule (argc)) // expected-error {{expected 'static' in OpenMP clause 'dist_schedule'}} expected-warning {{extra tokens at the end of '#pragma omp teams distribute' are ignored}}
  43   for (int i = 0; i < 10; ++i) foo();
  44
  45 #pragma omp target
  46 #pragma omp teams distribute dist_schedule (static, argc > 0 ? argv[1] : argv[2]) // expected-error2 {{expression must have integral or unscoped enumeration type, not 'char *'}}
  47   for (int i = 0; i < 10; ++i) foo();
  48
  49 #pragma omp target
  50 #pragma omp teams distribute dist_schedule (static), dist_schedule (static, 1) // expected-error {{directive '#pragma omp teams distribute' cannot contain more than one 'dist_schedule' clause}}
  51   for (int i = 0; i < 10; ++i) foo();
  52
  53 #pragma omp target
  54 #pragma omp teams distribute dist_schedule (static, S1) // expected-error {{'S1' does not refer to a value}}
  55   for (int i = 0; i < 10; ++i) foo();
  56
  57 #pragma omp target
  58 #pragma omp teams distribute dist_schedule (static, argv[1]=2) // expected-error {{expected ')'}} expected-note {{to match this '('}} expected-error3 {{expression must have integral or unscoped enumeration type, not 'char *'}}
  59   for (int i = 0; i < 10; ++i) foo();
  60
  61   return T();
  62 }
  63
  64 int main(int argc, char **argv) {
  65 #pragma omp target
  66 #pragma omp teams distribute dist_schedule // expected-error {{expected '(' after 'dist_schedule'}}
  67   for (int i = 0; i < 10; ++i) foo();
  68
  69 #pragma omp target
  70 #pragma omp teams distribute dist_schedule ( // expected-error {{expected 'static' in OpenMP clause 'dist_schedule'}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  71   for (int i = 0; i < 10; ++i) foo();
  72
  73 #pragma omp target
  74 #pragma omp teams distribute dist_schedule () // expected-error {{expected 'static' in OpenMP clause 'dist_schedule'}}
  75   for (int i = 0; i < 10; ++i) foo();
  76
  77 #pragma omp target
  78 #pragma omp teams distribute dist_schedule (static // expected-error {{expected ')'}} expected-note {{to match this '('}}
  79   for (int i = 0; i < 10; ++i) foo();
  80
  81 #pragma omp target
  82 #pragma omp teams distribute dist_schedule (static, // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
  83   for (int i = 0; i < 10; ++i) foo();
  84
  85 #pragma omp target
  86 #pragma omp teams distribute dist_schedule (argc)) // expected-error {{expected 'static' in OpenMP clause 'dist_schedule'}} expected-warning {{extra tokens at the end of '#pragma omp teams distribute' are ignored}}
  87   for (int i = 0; i < 10; ++i) foo();
  88
  89 #pragma omp target
  90 #pragma omp teams distribute dist_schedule (static, argc > 0 ? argv[1] : argv[2]) // expected-error {{expression must have integral or unscoped enumeration type, not 'char *'}}
  91   for (int i = 0; i < 10; ++i) foo();
  92
  93 #pragma omp target
  94 #pragma omp teams distribute dist_schedule (static), dist_schedule (static, 1) // expected-error {{directive '#pragma omp teams distribute' cannot contain more than one 'dist_schedule' clause}}
  95   for (int i = 0; i < 10; ++i) foo();
  96
  97 #pragma omp target
  98 #pragma omp teams distribute dist_schedule (static, S1) // expected-error {{'S1' does not refer to a value}}
  99   for (int i = 0; i < 10; ++i) foo();
 100
 101 #pragma omp target
 102 #pragma omp teams distribute dist_schedule (static, argv[1]=2) // expected-error {{expression must have integral or unscoped enumeration type, not 'char *'}} expected-error {{expected ')'}} expected-note {{to match this '('}}
 103   for (int i = 0; i < 10; ++i) foo();
 104
 105   return (tmain<int, 5>(argc) + tmain<char, 1>(argv[0][0])); // expected-note {{in instantiation of function template specialization 'tmain<int, 5>' requested here}} expected-note {{in instantiation of function template specialization 'tmain<char, 1>' requested here}}
 106 }