153 lines · c
1// RUN: %clang_cc1 -verify=omp50,omp5x,expected -fopenmp -fopenmp-version=50 -ferror-limit 100 -DOMP50 %s2// RUN: %clang_cc1 -verify=omp51,omp5x,expected -fopenmp -ferror-limit 100 %s3// RUN: %clang_cc1 -verify=expected,omp52,omp5x -fopenmp -fopenmp-version=52 -ferror-limit 100 -DOMP52 %s4// RUN: %clang_cc1 -verify=expected,omp60,omp60-maybe-simd -fopenmp -fopenmp-version=60 -ferror-limit 100 -DOMP60 %s5 6// RUN: %clang_cc1 -verify=omp50,omp5x,expected -fopenmp-simd -fopenmp-version=50 -ferror-limit 100 -DOMP50 %s7// RUN: %clang_cc1 -verify=omp51-simd,omp5x,expected -fopenmp-simd -ferror-limit 100 %s8// RUN: %clang_cc1 -verify=expected,omp52,omp5x -fopenmp-simd -fopenmp-version=52 -ferror-limit 100 -DOMP52 %s9// RUN: %clang_cc1 -verify=expected,omp60-simd,omp60-maybe-simd -fopenmp-simd -fopenmp-version=60 -ferror-limit 100 -DOMP60 %s10 11int temp; // expected-note {{'temp' declared here}}12 13struct vec { // expected-note {{definition of 'struct vec' is not complete until the closing '}'}}14 int len;15#pragma omp declare mapper(id: struct vec v) map(v.len) // expected-error {{incomplete definition of type 'struct vec'}}16 double *data;17};18 19// omp60-maybe-simd-error@+2 {{expected '(' after 'declare_mapper'}}20// omp5x-error@+1 {{expected '(' after 'declare mapper'}}21#pragma omp declare mapper22// omp60-maybe-simd-error@+2 {{expected '(' after 'declare_mapper'}}23// omp5x-error@+1 {{expected '(' after 'declare mapper'}}24#pragma omp declare mapper {25// expected-error@+2 {{expected a type}}26// expected-error@+1 {{expected declarator on 'omp declare mapper' directive}}27#pragma omp declare mapper(28// expected-error@+2 {{expected a type}}29// expected-error@+1 {{expected declarator on 'omp declare mapper' directive}}30#pragma omp declare mapper(#31// expected-error@+1 {{expected declarator on 'omp declare mapper' directive}}32#pragma omp declare mapper(struct v33// expected-error@+1 {{expected declarator on 'omp declare mapper' directive}}34#pragma omp declare mapper(struct vec35// expected-error@+1 {{unknown type name 'S'}}36#pragma omp declare mapper(S v37// expected-error@+2 {{expected ')'}}38// expected-note@+1 {{to match this '('}}39#pragma omp declare mapper(struct vec v40// omp60-maybe-simd-error@+2 {{expected at least one clause on '#pragma omp declare_mapper' directive}}41// omp5x-error@+1 {{expected at least one clause on '#pragma omp declare mapper' directive}}42#pragma omp declare mapper(aa:struct vec v)43// omp60-maybe-simd-error@+4 {{expected at least one clause on '#pragma omp declare_mapper' directive}}44// omp60-maybe-simd-error@+3 {{unexpected OpenMP clause 'private' in directive '#pragma omp declare_mapper'}}45// omp5x-error@+2 {{expected at least one clause on '#pragma omp declare mapper' directive}}46// omp5x-error@+1 {{unexpected OpenMP clause 'private' in directive '#pragma omp declare mapper'}}47#pragma omp declare mapper(bb:struct vec v) private(v)48// omp60-maybe-simd-warning@+2 {{extra tokens at the end of '#pragma omp declare_mapper' are ignored}}49// omp5x-warning@+1 {{extra tokens at the end of '#pragma omp declare mapper' are ignored}}50#pragma omp declare mapper(cc:struct vec v) map(v) (51 52#pragma omp declare mapper(++: struct vec v) map(v.len) // expected-error {{illegal OpenMP user-defined mapper identifier}}53#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}}54#pragma omp declare mapper(default : struct vec kk) map(kk.data[0:2]) // expected-note {{previous definition is here}}55#pragma omp declare mapper(struct vec v) map(v.len) // expected-error {{redefinition of user-defined mapper for type 'struct vec' with name 'default'}}56#pragma omp declare mapper(int v) map(v) // expected-error {{mapper type must be of struct, union or class type}}57 58#if !defined(OMP52) && !defined(OMP60)59// omp51-simd-error@+6 {{incorrect map type modifier, expected one of: 'always', 'close', 'mapper', 'present', 'ompx_hold'}}60// omp50-error@+5 {{incorrect map type modifier, expected one of: 'always', 'close', 'mapper', 'ompx_hold'}}61// omp51-error@+4 {{incorrect map type modifier, expected one of: 'always', 'close', 'mapper', 'present', 'ompx_hold'}}62// expected-error@+3 {{only variable 'vvec' is allowed in map clauses of this 'omp declare mapper' directive}}63// expected-error@+2 {{expected at least one clause on '#pragma omp declare mapper' directive}}64// expected-note@+1 {{'it' declared here}}65#pragma omp declare mapper(id2: struct vec vvec) map(iterator(it=0:vvec.len:2), tofrom:vvec.data[it]) 66 67#else68#pragma omp declare mapper(id2: struct vec vvec) map(iterator(it=0:vvec.len:2), tofrom:vvec.data[it])69 70int var; // expected-note {{'var' declared here}}71// expected-error@+1 {{only variable 'vvec' is allowed in map clauses of this 'omp declare mapper' directive}}72#pragma omp declare mapper(id3: struct vec vvec) map(iterator(it=0:vvec.len:2), tofrom:vvec.data[var])73 74#endif // OMP5275 76int fun(int arg) {77#pragma omp declare mapper(id: struct vec v) map(v.len)78 {79#pragma omp declare mapper(id: struct vec v) map(v.len) // expected-note {{previous definition is here}}80#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'}}81 {82// omp60-maybe-simd-error@+2 {{unexpected OpenMP clause 'allocate' in directive '#pragma omp declare_mapper'}}83// omp5x-error@+1 {{unexpected OpenMP clause 'allocate' in directive '#pragma omp declare mapper'}}84#pragma omp declare mapper(id: struct vec v) map(v.len) allocate(v)85 struct vec vv, v1;86 struct vec arr[10];87 double d;88#pragma omp target map(mapper) // expected-error {{use of undeclared identifier 'mapper'}}89 {}90#pragma omp target map(mapper:vv) // expected-error {{expected '(' after 'mapper'}}91 {}92#pragma omp target map(mapper( :vv) // expected-error {{expected expression}} expected-error {{expected ')'}} expected-error {{call to undeclared function 'mapper'}} expected-note {{to match this '('}}93 {}94#pragma omp target map(mapper(aa :vv) // expected-error {{use of undeclared identifier 'aa'}} expected-error {{expected ')'}} expected-error {{call to undeclared function 'mapper'}} expected-note {{to match this '('}}95 {}96#ifndef OMP6097#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'}}98#endif99 {}100#ifndef OMP60101#pragma omp target map(mapper(ab) :arr[0:2]) // expected-error {{missing map type}} expected-error {{cannot find a valid user-defined mapper for type 'struct vec' with name 'ab'}}102#endif103 {}104#ifndef OMP60105#pragma omp target map(mapper(aa) :vv) // omp50-error {{missing map type}} omp51-error {{missing map type}} omp52-error {{missing map type}} omp51-simd-error {{missing map type}}106 {}107#endif108// expected-error@+4 {{mapper type must be of struct, union or class type}}109// omp52-error@+3 {{missing ',' after map type modifier}}110// omp60-error@+2 {{missing ',' after map type modifier}}111// omp60-simd-error@+1 {{missing ',' after map type modifier}}112#pragma omp target map(mapper(aa) to:d)113 {}114// omp52-error@+3 4 {{missing ',' after map type modifier}}115// omp60-error@+2 4 {{missing ',' after map type modifier}}116// omp60-simd-error@+1 4 {{missing ',' after map type modifier}}117#pragma omp target map(mapper(aa) to:vv) map(close mapper(aa) from:v1) map(mapper(aa) to:arr[0])118 {}119 120#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'}}121#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'}}122#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'}}123#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'}}124#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'}}125#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'}}126#pragma omp target update to(mapper(ab):arr[0:2]) // 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'}}127#ifdef OMP50128#pragma omp target update to(mapper(aa) a:vv) // expected-warning {{missing ':' after ) - ignoring}}129#else130#pragma omp target update to(mapper(aa) a:vv) // expected-warning {{missing ':' after motion modifier - ignoring}}131#endif132#pragma omp target update to(mapper(aa):d) // expected-error {{mapper type must be of struct, union or class type}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}}133#pragma omp target update to(mapper(aa):vv) to(mapper(aa):arr[0])134 135#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'}}136#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'}}137#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'}}138#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'}}139#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'}}140#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'}}141#pragma omp target update from(mapper(ab):arr[0:2]) // 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'}}142#ifdef OMP50143#pragma omp target update from(mapper(aa) a:vv) // expected-warning {{missing ':' after ) - ignoring}}144#else145#pragma omp target update from(mapper(aa) a:vv) // expected-warning {{missing ':' after motion modifier - ignoring}}146#endif147#pragma omp target update from(mapper(aa):d) // expected-error {{mapper type must be of struct, union or class type}} expected-error {{expected at least one 'to' clause or 'from' clause specified to '#pragma omp target update'}}148#pragma omp target update from(mapper(aa):vv) from(mapper(aa):arr[0])149 }150 }151 return arg;152}153