7dcff5912a
This clause works identically as far as Sema is concerned, to the 'private' clause on compute constructs, so this simply adds tests and unblocks the ASTNode generation and Sema checking when used on loop clauses.
133 lines
4.6 KiB
C
133 lines
4.6 KiB
C
// RUN: %clang_cc1 %s -fopenacc -verify
|
|
|
|
struct Incomplete;
|
|
enum SomeE{ A };
|
|
typedef struct IsComplete {
|
|
struct S { int A; } CompositeMember;
|
|
int ScalarMember;
|
|
float ArrayMember[5];
|
|
enum SomeE EnumMember;
|
|
void *PointerMember;
|
|
} Complete;
|
|
|
|
int GlobalInt;
|
|
float GlobalArray[5];
|
|
short *GlobalPointer;
|
|
Complete GlobalComposite;
|
|
|
|
void uses(int IntParam, short *PointerParam, float ArrayParam[5], Complete CompositeParam) {
|
|
int LocalInt;
|
|
short *LocalPointer;
|
|
float LocalArray[5];
|
|
Complete LocalComposite;
|
|
|
|
// Check Appertainment:
|
|
#pragma acc loop private(LocalInt)
|
|
for(;;);
|
|
|
|
// Valid cases:
|
|
#pragma acc loop private(LocalInt, LocalPointer, LocalArray)
|
|
for(;;);
|
|
#pragma acc loop private(LocalArray)
|
|
for(;;);
|
|
#pragma acc loop private(LocalArray[:])
|
|
for(;;);
|
|
#pragma acc loop private(LocalArray[:5])
|
|
for(;;);
|
|
#pragma acc loop private(LocalArray[2:])
|
|
for(;;);
|
|
#pragma acc loop private(LocalArray[2:1])
|
|
for(;;);
|
|
#pragma acc loop private(LocalArray[2])
|
|
for(;;);
|
|
#pragma acc loop private(LocalComposite)
|
|
for(;;);
|
|
#pragma acc loop private(LocalComposite.EnumMember)
|
|
for(;;);
|
|
#pragma acc loop private(LocalComposite.ScalarMember)
|
|
for(;;);
|
|
#pragma acc loop private(LocalComposite.ArrayMember)
|
|
for(;;);
|
|
#pragma acc loop private(LocalComposite.ArrayMember[5])
|
|
for(;;);
|
|
#pragma acc loop private(LocalComposite.PointerMember)
|
|
for(;;);
|
|
#pragma acc loop private(GlobalInt, GlobalArray, GlobalPointer, GlobalComposite)
|
|
for(;;);
|
|
#pragma acc loop private(GlobalArray[2], GlobalPointer[2], GlobalComposite.CompositeMember.A)
|
|
for(;;);
|
|
#pragma acc loop private(LocalComposite, GlobalComposite)
|
|
for(;;);
|
|
#pragma acc loop private(IntParam, PointerParam, ArrayParam, CompositeParam)
|
|
for(;;);
|
|
#pragma acc loop private(PointerParam[IntParam], ArrayParam[IntParam], CompositeParam.CompositeMember.A)
|
|
for(;;);
|
|
|
|
#pragma acc loop private(LocalArray) private(LocalArray[2])
|
|
for(;;);
|
|
|
|
#pragma acc loop private(LocalArray, LocalArray[2])
|
|
for(;;);
|
|
|
|
#pragma acc loop private(LocalComposite, LocalComposite.ScalarMember)
|
|
for(;;);
|
|
|
|
#pragma acc loop private(LocalComposite.CompositeMember.A, LocalComposite.ScalarMember)
|
|
for(;;);
|
|
|
|
#pragma acc loop private(LocalComposite.CompositeMember.A) private(LocalComposite.ScalarMember)
|
|
for(;;);
|
|
|
|
Complete LocalComposite2;
|
|
#pragma acc loop private(LocalComposite2.ScalarMember, LocalComposite2.ScalarMember)
|
|
for(;;);
|
|
|
|
// Invalid cases, arbitrary expressions.
|
|
struct Incomplete *I;
|
|
// expected-error@+1{{OpenACC variable is not a valid variable name, sub-array, array element, member of a composite variable, or composite variable member}}
|
|
#pragma acc loop private(*I)
|
|
for(;;);
|
|
// expected-error@+1{{OpenACC variable is not a valid variable name, sub-array, array element, member of a composite variable, or composite variable member}}
|
|
#pragma acc loop private(GlobalInt + IntParam)
|
|
for(;;);
|
|
// expected-error@+1{{OpenACC variable is not a valid variable name, sub-array, array element, member of a composite variable, or composite variable member}}
|
|
#pragma acc loop private(+GlobalInt)
|
|
for(;;);
|
|
|
|
// expected-error@+1{{OpenACC sub-array length is unspecified and cannot be inferred because the subscripted value is not an array}}
|
|
#pragma acc loop private(PointerParam[:])
|
|
for(;;);
|
|
#pragma acc loop private(PointerParam[:5])
|
|
for(;;);
|
|
#pragma acc loop private(PointerParam[:IntParam])
|
|
for(;;);
|
|
// expected-error@+1{{OpenACC sub-array length is unspecified and cannot be inferred because the subscripted value is not an array}}
|
|
#pragma acc loop private(PointerParam[2:])
|
|
for(;;);
|
|
#pragma acc loop private(PointerParam[2:5])
|
|
for(;;);
|
|
#pragma acc loop private(PointerParam[2])
|
|
for(;;);
|
|
#pragma acc loop private(ArrayParam[:])
|
|
for(;;);
|
|
#pragma acc loop private(ArrayParam[:5])
|
|
for(;;);
|
|
#pragma acc loop private(ArrayParam[:IntParam])
|
|
for(;;);
|
|
#pragma acc loop private(ArrayParam[2:])
|
|
for(;;);
|
|
// expected-error@+1{{OpenACC sub-array specified range [2:5] would be out of the range of the subscripted array size of 5}}
|
|
#pragma acc loop private(ArrayParam[2:5])
|
|
for(;;);
|
|
#pragma acc loop private(ArrayParam[2])
|
|
for(;;);
|
|
|
|
// expected-error@+2{{OpenACC sub-array specified range [2:5] would be out of the range of the subscripted array size of 5}}
|
|
// expected-error@+1{{OpenACC variable is not a valid variable name, sub-array, array element, member of a composite variable, or composite variable member}}
|
|
#pragma acc loop private((float*)ArrayParam[2:5])
|
|
for(;;);
|
|
// expected-error@+1{{OpenACC variable is not a valid variable name, sub-array, array element, member of a composite variable, or composite variable member}}
|
|
#pragma acc loop private((float)ArrayParam[2])
|
|
for(;;);
|
|
}
|