112 lines · cpp
1// RUN: %clang_cc1 %s -fopenacc -verify2 3enum SomeE{};4typedef struct IsComplete {5 struct S { int A; } CompositeMember;6 int ScalarMember;7 float ArrayMember[5];8 SomeE EnumMember;9 char *PointerMember;10} Complete;11 12void uses(int IntParam, char *PointerParam, float ArrayParam[5], Complete CompositeParam, int &IntParamRef) {13 int LocalInt;14 char *LocalPointer;15 float LocalArray[5];16 // Check Appertainment:17#pragma acc parallel create(LocalInt)18 while(1);19#pragma acc serial create(LocalInt)20 while(1);21#pragma acc kernels create(LocalInt)22 while(1);23 24 // Valid cases:25#pragma acc parallel create(LocalInt, LocalPointer, LocalArray)26 while(1);27#pragma acc parallel create(LocalArray[2:1])28 while(1);29 30 Complete LocalComposite2;31#pragma acc parallel create(LocalComposite2.ScalarMember, LocalComposite2.ScalarMember)32 while(1);33 34 // expected-error@+1{{OpenACC variable is not a valid variable name, sub-array, array element, member of a composite variable, or composite variable member}}35#pragma acc parallel create(1 + IntParam)36 while(1);37 38 // expected-error@+1{{OpenACC variable is not a valid variable name, sub-array, array element, member of a composite variable, or composite variable member}}39#pragma acc parallel create(+IntParam)40 while(1);41 42 // expected-error@+1{{OpenACC sub-array length is unspecified and cannot be inferred because the subscripted value is not an array}}43#pragma acc parallel create(PointerParam[2:])44 while(1);45 46 // expected-error@+1{{OpenACC sub-array specified range [2:5] would be out of the range of the subscripted array size of 5}}47#pragma acc parallel create(ArrayParam[2:5])48 while(1);49 50 // expected-error@+1{{OpenACC sub-array specified range [2:5] would be out of the range of the subscripted array size of 5}}51#pragma acc parallel create((float*)ArrayParam[2:5])52 while(1);53 // expected-error@+1{{OpenACC variable is not a valid variable name, sub-array, array element, member of a composite variable, or composite variable member}}54#pragma acc parallel create((float)ArrayParam[2])55 while(1);56}57 58template<typename T, unsigned I, typename V>59void TemplUses(T t, T (&arrayT)[I], V TemplComp) {60 // expected-error@+1{{OpenACC variable is not a valid variable name, sub-array, array element, member of a composite variable, or composite variable member}}61#pragma acc parallel create(+t)62 while(true);63 64 // NTTP's are only valid if it is a reference to something.65 // expected-error@+2{{OpenACC variable is not a valid variable name, sub-array, array element, member of a composite variable, or composite variable member}}66 // expected-note@#TEMPL_USES_INST{{in instantiation of}}67#pragma acc parallel create(I)68 while(true);69 70 // expected-error@+1{{OpenACC variable is not a valid variable name, sub-array, array element, member of a composite variable, or composite variable member}}71#pragma acc parallel create(t, I)72 while(true);73 74#pragma acc parallel create(arrayT)75 while(true);76 77#pragma acc parallel create(TemplComp)78 while(true);79 80#pragma acc parallel create(TemplComp.PointerMember[5])81 while(true);82 int *Pointer;83#pragma acc parallel create(Pointer[:I])84 while(true);85#pragma acc parallel create(Pointer[:t])86 while(true);87 // expected-error@+1{{OpenACC sub-array length is unspecified and cannot be inferred because the subscripted value is not an array}}88#pragma acc parallel create(Pointer[1:])89 while(true);90}91 92template<unsigned I, auto &NTTP_REF>93void NTTP() {94 // NTTP's are only valid if it is a reference to something.95 // expected-error@+2{{OpenACC variable is not a valid variable name, sub-array, array element, member of a composite variable, or composite variable member}}96 // expected-note@#NTTP_INST{{in instantiation of}}97#pragma acc parallel create(I)98 while(true);99 100#pragma acc parallel create(NTTP_REF)101 while(true);102}103 104void Inst() {105 static constexpr int NTTP_REFed = 1;106 int i;107 int Arr[5];108 Complete C;109 TemplUses(i, Arr, C); // #TEMPL_USES_INST110 NTTP<5, NTTP_REFed>(); // #NTTP_INST111}112