| 1 | // RUN: %clang_cc1 -verify -fopenmp -ferror-limit 100 %s |
| 2 | |
| 3 | // RUN: %clang_cc1 -verify -fopenmp-simd -ferror-limit 100 %s |
| 4 | |
| 5 | int temp; // expected-note {{'temp' declared here}} |
| 6 | |
| 7 | struct vec { // expected-note {{definition of 'struct vec' is not complete until the closing '}'}} |
| 8 | int len; |
| 9 | #pragma omp declare mapper(id: struct vec v) map(v.len) // expected-error {{incomplete definition of type 'struct vec'}} |
| 10 | double *data; |
| 11 | }; |
| 12 | |
| 13 | #pragma omp declare mapper // expected-error {{expected '(' after 'declare mapper'}} |
| 14 | #pragma omp declare mapper { // expected-error {{expected '(' after 'declare mapper'}} |
| 15 | #pragma omp declare mapper( // expected-error {{expected a type}} expected-error {{expected declarator on 'omp declare mapper' directive}} |
| 16 | #pragma omp declare mapper(# // expected-error {{expected a type}} expected-error {{expected declarator on 'omp declare mapper' directive}} |
| 17 | #pragma omp declare mapper(struct v // expected-error {{expected declarator on 'omp declare mapper' directive}} |
| 18 | #pragma omp declare mapper(struct vec // expected-error {{expected declarator on 'omp declare mapper' directive}} |
| 19 | #pragma omp declare mapper(S v // expected-error {{unknown type name 'S'}} |
| 20 | #pragma omp declare mapper(struct vec v // expected-error {{expected ')'}} expected-note {{to match this '('}} |
| 21 | #pragma omp declare mapper(aa:struct vec v) // expected-error {{expected at least one clause on '#pragma omp declare mapper' directive}} |
| 22 | #pragma omp declare mapper(bb:struct vec v) private(v) // expected-error {{expected at least one clause on '#pragma omp declare mapper' directive}} // expected-error {{unexpected OpenMP clause 'private' in directive '#pragma omp declare mapper'}} |
| 23 | #pragma omp declare mapper(cc:struct vec v) map(v) ( // expected-warning {{extra tokens at the end of '#pragma omp declare mapper' are ignored}} |
| 24 | |
| 25 | #pragma omp declare mapper(++: struct vec v) map(v.len) // expected-error {{illegal OpenMP user-defined mapper identifier}} |
| 26 | #pragma omp declare mapper(id1: struct vec v) map(v.len, temp) // expected-error {{only variable v is allowed in map clauses of this 'omp declare mapper' directive}} |
| 27 | #pragma omp declare mapper(default : struct vec kk) map(kk.data[0:2]) // expected-note {{previous definition is here}} |
| 28 | #pragma omp declare mapper(struct vec v) map(v.len) // expected-error {{redefinition of user-defined mapper for type 'struct vec' with name 'default'}} |
| 29 | #pragma omp declare mapper(int v) map(v) // expected-error {{mapper type must be of struct, union or class type}} |
| 30 | |
| 31 | int fun(int arg) { |
| 32 | #pragma omp declare mapper(id: struct vec v) map(v.len) |
| 33 | { |
| 34 | #pragma omp declare mapper(id: struct vec v) map(v.len) // expected-note {{previous definition is here}} |
| 35 | #pragma omp declare mapper(id: struct vec v) map(v.len) // expected-error {{redefinition of user-defined mapper for type 'struct vec' with name 'id'}} |
| 36 | { |
| 37 | #pragma omp declare mapper(id: struct vec v) map(v.len) allocate(v) // expected-error {{unexpected OpenMP clause 'allocate' in directive '#pragma omp declare mapper'}} |
| 38 | struct vec vv, v1; |
| 39 | #pragma omp target map(mapper) // expected-error {{use of undeclared identifier 'mapper'}} |
| 40 | {} |
| 41 | #pragma omp target map(mapper:vv) // expected-error {{expected '(' after 'mapper'}} |
| 42 | {} |
| 43 | #pragma omp target map(mapper( :vv) // expected-error {{expected expression}} expected-error {{expected ')'}} expected-warning {{implicit declaration of function 'mapper' is invalid in C99}} expected-note {{to match this '('}} |
| 44 | {} |
| 45 | #pragma omp target map(mapper(aa :vv) // expected-error {{use of undeclared identifier 'aa'}} expected-error {{expected ')'}} expected-warning {{implicit declaration of function 'mapper' is invalid in C99}} expected-note {{to match this '('}} |
| 46 | {} |
| 47 | #pragma omp target map(mapper(ab) :vv) // expected-error {{missing map type}} expected-error {{cannot find a valid user-defined mapper for type 'struct vec' with name 'ab'}} |
| 48 | {} |
| 49 | #pragma omp target map(mapper(aa) :vv) // expected-error {{missing map type}} |
| 50 | {} |
| 51 | #pragma omp target map(mapper(aa) to:vv) map(close mapper(aa) from:v1) |
| 52 | {} |
| 53 | |
| 54 | #pragma omp target update to(mapper) // expected-error {{expected '(' after 'mapper'}} expected-error {{expected expression}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}} |
| 55 | #pragma omp target update to(mapper() // expected-error {{illegal OpenMP user-defined mapper identifier}} expected-error {{expected expression}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}} |
| 56 | #pragma omp target update to(mapper:vv) // expected-error {{expected '(' after 'mapper'}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}} |
| 57 | #pragma omp target update to(mapper(:vv) // expected-error {{illegal OpenMP user-defined mapper identifier}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}} |
| 58 | #pragma omp target update to(mapper(aa :vv) // expected-error {{expected ')'}} expected-note {{to match this '('}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}} |
| 59 | #pragma omp target update to(mapper(ab):vv) // expected-error {{cannot find a valid user-defined mapper for type 'struct vec' with name 'ab'}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}} |
| 60 | #pragma omp target update to(mapper(aa):vv) |
| 61 | |
| 62 | #pragma omp target update from(mapper) // expected-error {{expected '(' after 'mapper'}} expected-error {{expected expression}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}} |
| 63 | #pragma omp target update from(mapper() // expected-error {{illegal OpenMP user-defined mapper identifier}} expected-error {{expected expression}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}} |
| 64 | #pragma omp target update from(mapper:vv) // expected-error {{expected '(' after 'mapper'}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}} |
| 65 | #pragma omp target update from(mapper(:vv) // expected-error {{illegal OpenMP user-defined mapper identifier}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}} |
| 66 | #pragma omp target update from(mapper(aa :vv) // expected-error {{expected ')'}} expected-note {{to match this '('}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}} |
| 67 | #pragma omp target update from(mapper(ab):vv) // expected-error {{cannot find a valid user-defined mapper for type 'struct vec' with name 'ab'}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}} |
| 68 | #pragma omp target update from(mapper(aa) a:vv) // expected-warning {{missing ':' after ) - ignoring}} |
| 69 | #pragma omp target update from(mapper(aa):vv) |
| 70 | } |
| 71 | } |
| 72 | return arg; |
| 73 | } |
| 74 | |