llvm-project/clang/test/SemaOpenACC/loop-construct-reduction-clause.cpp
Erich Keane b0cfbfd74b
[OpenACC] Implement loop restrictions on for loops. (#115370)
OpenACC restricts the contents of a 'for' loop affected by a 'loop'
construct without a 'seq'. The loop variable must be integer, pointer,
or random-access-iterator, it must monotonically increase/decrease, and
the trip count must be computable at runtime before the function.

This patch tries to implement some of these limitations to the best of
our ability, though it causes us to be perhaps overly restrictive at the
moment. I expect we'll revisit some of these rules/add additional
supported forms of loop-variable and 'monotonically increasing' here,
but the currently enforced rules are heavily inspired by the OMP
implementation here.
2024-11-08 05:49:45 -08:00

367 lines
11 KiB
C++

// RUN: %clang_cc1 %s -fopenacc -verify
struct CompositeOfScalars {
int I;
float F;
short J;
char C;
double D;
_Complex float CF;
_Complex double CD;
};
struct CompositeHasComposite {
int I;
float F;
short J;
char C;
double D;
_Complex float CF;
_Complex double CD;
struct CompositeOfScalars COS; // #COS_FIELD
};
void uses() {
int I;
float F;
int Array[5];
CompositeOfScalars CoS;
CompositeHasComposite ChC;
#pragma acc serial
{
#pragma acc loop reduction(+:CoS, I, F)
for(int i = 0; i < 5; ++i){}
}
#pragma acc serial
{
// expected-error@+1{{OpenACC 'reduction' variable must be of scalar type, sub-array, or a composite of scalar types; type is 'int[5]'}}
#pragma acc loop reduction(+:Array)
for(int i = 0; i < 5; ++i){}
}
#pragma acc serial
{
// expected-error@+2{{OpenACC 'reduction' composite variable must not have non-scalar field}}
// expected-note@#COS_FIELD{{invalid field is here}}
#pragma acc loop reduction(+:ChC)
for(int i = 0; i < 5; ++i){}
}
#pragma acc serial
{
#pragma acc loop reduction(+:I)
for(int i = 0; i < 5; ++i) {
// expected-error@+2{{OpenACC 'reduction' variable must have the same operator in all nested constructs (& vs +)}}
// expected-note@-3{{previous clause is here}}
#pragma acc loop reduction(&:I)
for(int i = 0; i < 5; ++i) {
}
}
}
#pragma acc serial
{
#pragma acc loop reduction(+:I)
for(int i = 0; i < 5; ++i) {
// expected-error@+2{{OpenACC 'reduction' variable must have the same operator in all nested constructs (& vs +)}}
// expected-note@-3{{previous clause is here}}
#pragma acc loop reduction(&:I)
for(int i = 0; i < 5; ++i) {
}
}
}
#pragma acc serial
{
#pragma acc loop reduction(+:I)
for(int i = 0; i < 5; ++i) {
#pragma acc serial
// expected-error@+2{{OpenACC 'reduction' variable must have the same operator in all nested constructs (& vs +)}}
// expected-note@-4{{previous clause is here}}
#pragma acc loop reduction(&:I)
for(int i = 0; i < 5; ++i) {
}
}
}
#pragma acc serial reduction(+:I)
// expected-error@+2{{OpenACC 'reduction' variable must have the same operator in all nested constructs (& vs +)}}
// expected-note@-2{{previous clause is here}}
#pragma acc loop reduction(&:I)
for(int i = 0; i < 5; ++i){}
#pragma acc serial
#pragma acc loop reduction(&:I)
for(int i = 0; i < 5; ++i) {
// expected-error@+2{{OpenACC 'reduction' variable must have the same operator in all nested constructs (+ vs &)}}
// expected-note@-3{{previous clause is here}}
#pragma acc serial reduction(+:I)
;
}
#pragma acc parallel
{
#pragma acc loop reduction(+:I) gang(dim:1)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel
{
// expected-error@+2{{OpenACC 'gang' clause with a 'dim' value greater than 1 cannot appear on the same 'loop' construct as a 'reduction' clause}}
// expected-note@+1{{previous clause is here}}
#pragma acc loop reduction(+:I) gang(dim:2)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel
{
// expected-error@+2{{OpenACC 'reduction' clause cannot appear on the same 'loop' construct as a 'gang' clause with a 'dim' value greater than 1}}
// expected-note@+1{{previous clause is here}}
#pragma acc loop gang(dim:2) reduction(+:I)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel
{
// expected-error@+2{{OpenACC 'reduction' clause cannot appear on the same 'loop' construct as a 'gang' clause with a 'dim' value greater than 1}}
// expected-note@+1{{previous clause is here}}
#pragma acc loop gang gang(dim:1) gang(dim:2) reduction(+:I)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel num_gangs(1, 2)
{
// expected-error@+3{{OpenACC 'reduction' clause cannot appear on the same 'loop' construct as a 'gang' clause inside a compute construct with a 'num_gangs' clause with more than one argument}}
// expected-note@+2{{previous clause is here}}
// expected-note@-4{{previous clause is here}}
#pragma acc loop gang(dim:1) reduction(+:I)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel num_gangs(2, 3)
{
// expected-error@+3{{OpenACC 'gang' clause cannot appear on the same 'loop' construct as a 'reduction' clause inside a compute construct with a 'num_gangs' clause with more than one argument}}
// expected-note@+2{{previous clause is here}}
// expected-note@-4{{previous clause is here}}
#pragma acc loop reduction(+:I) gang(dim:1)
for(int i = 0; i < 5; ++i) {
}
}
}
template<typename IntTy, typename CoSTy, typename ChCTy, unsigned One,
unsigned Two>
void templ_uses() {
IntTy I;
IntTy Array[5];
CoSTy CoS;
ChCTy ChC;
#pragma acc serial
{
#pragma acc loop reduction(+:CoS, I)
for(int i = 0; i < 5; ++i){}
}
#pragma acc serial
{
// expected-error@+1{{OpenACC 'reduction' variable must be of scalar type, sub-array, or a composite of scalar types; type is 'int[5]'}}
#pragma acc loop reduction(+:Array)
for(int i = 0; i < 5; ++i){}
}
#pragma acc serial
{
// expected-error@+2{{OpenACC 'reduction' composite variable must not have non-scalar field}}
// expected-note@#COS_FIELD{{invalid field is here}}
#pragma acc loop reduction(+:ChC)
for(int i = 0; i < 5; ++i){}
}
#pragma acc serial
{
#pragma acc loop reduction(+:I)
for(int i = 0; i < 5; ++i) {
// expected-error@+2{{OpenACC 'reduction' variable must have the same operator in all nested constructs (& vs +)}}
// expected-note@-3{{previous clause is here}}
#pragma acc loop reduction(&:I)
for(int i = 0; i < 5; ++i) {
}
}
}
#pragma acc serial
{
#pragma acc loop reduction(+:Array[3])
for(int i = 0; i < 5; ++i) {
// expected-error@+2{{OpenACC 'reduction' variable must have the same operator in all nested constructs (& vs +)}}
// expected-note@-3{{previous clause is here}}
#pragma acc loop reduction(&:Array[3])
for(int i = 0; i < 5; ++i) {
}
}
}
#pragma acc serial
{
#pragma acc loop reduction(+:Array[0:3])
for(int i = 0; i < 5; ++i) {
// expected-error@+2{{OpenACC 'reduction' variable must have the same operator in all nested constructs (& vs +)}}
// expected-note@-3{{previous clause is here}}
#pragma acc loop reduction(&:Array[1:4])
for(int i = 0; i < 5; ++i) {
}
}
}
#pragma acc serial
{
#pragma acc loop reduction(+:I)
for(int i = 0; i < 5; ++i) {
// expected-error@+2{{OpenACC 'reduction' variable must have the same operator in all nested constructs (& vs +)}}
// expected-note@-3{{previous clause is here}}
#pragma acc serial reduction(&:I)
for(int i = 0; i < 5; ++i) {
}
}
}
#pragma acc parallel
{
#pragma acc loop reduction(+:I) gang(dim:One)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel
{
// expected-error@+2{{OpenACC 'gang' clause with a 'dim' value greater than 1 cannot appear on the same 'loop' construct as a 'reduction' clause}}
// expected-note@+1{{previous clause is here}}
#pragma acc loop reduction(+:I) gang(dim:2)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel
{
// expected-error@+2{{OpenACC 'reduction' clause cannot appear on the same 'loop' construct as a 'gang' clause with a 'dim' value greater than 1}}
// expected-note@+1{{previous clause is here}}
#pragma acc loop gang(dim:2) reduction(+:I)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel
{
// expected-error@+2{{OpenACC 'gang' clause with a 'dim' value greater than 1 cannot appear on the same 'loop' construct as a 'reduction' clause}}
// expected-note@+1{{previous clause is here}}
#pragma acc loop reduction(+:I) gang(dim:Two)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel
{
// expected-error@+2{{OpenACC 'reduction' clause cannot appear on the same 'loop' construct as a 'gang' clause with a 'dim' value greater than 1}}
// expected-note@+1{{previous clause is here}}
#pragma acc loop gang(dim:Two) reduction(+:I)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel num_gangs(One)
{
#pragma acc loop reduction(+:I) gang(dim:One)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel num_gangs(Two, 1)
{
// expected-error@+3{{OpenACC 'gang' clause cannot appear on the same 'loop' construct as a 'reduction' clause inside a compute construct with a 'num_gangs' clause with more than one argument}}
// expected-note@+2{{previous clause is here}}
// expected-note@-4{{previous clause is here}}
#pragma acc loop reduction(+:I) gang(dim:One)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel num_gangs(Two, 1)
{
// expected-error@+3{{OpenACC 'reduction' clause cannot appear on the same 'loop' construct as a 'gang' clause inside a compute construct with a 'num_gangs' clause with more than one argument}}
// expected-note@+2{{previous clause is here}}
// expected-note@-4{{previous clause is here}}
#pragma acc loop gang(dim:One) reduction(+:I)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel num_gangs(One)
{
#pragma acc loop reduction(+:I) gang(dim:1)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel num_gangs(Two, 1)
{
// expected-error@+3{{OpenACC 'gang' clause cannot appear on the same 'loop' construct as a 'reduction' clause inside a compute construct with a 'num_gangs' clause with more than one argument}}
// expected-note@+2{{previous clause is here}}
// expected-note@-4{{previous clause is here}}
#pragma acc loop reduction(+:I) gang(dim:1)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel num_gangs(Two, 1)
{
// expected-error@+3{{OpenACC 'reduction' clause cannot appear on the same 'loop' construct as a 'gang' clause inside a compute construct with a 'num_gangs' clause with more than one argument}}
// expected-note@+2{{previous clause is here}}
// expected-note@-4{{previous clause is here}}
#pragma acc loop gang(dim:1) reduction(+:I)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel num_gangs(1)
{
#pragma acc loop reduction(+:I) gang(dim:One)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel num_gangs(2, 1)
{
// expected-error@+3{{OpenACC 'gang' clause cannot appear on the same 'loop' construct as a 'reduction' clause inside a compute construct with a 'num_gangs' clause with more than one argument}}
// expected-note@+2{{previous clause is here}}
// expected-note@-4{{previous clause is here}}
#pragma acc loop reduction(+:I) gang(dim:One)
for(int i = 0; i < 5; ++i) {
}
}
#pragma acc parallel num_gangs(2, 1)
{
// expected-error@+3{{OpenACC 'reduction' clause cannot appear on the same 'loop' construct as a 'gang' clause inside a compute construct with a 'num_gangs' clause with more than one argument}}
// expected-note@+2{{previous clause is here}}
// expected-note@-4{{previous clause is here}}
#pragma acc loop gang(dim:One) reduction(+:I)
for(int i = 0; i < 5; ++i) {
}
}
}
void inst() {
// expected-note@+1{{in instantiation of function template specialization}}
templ_uses<int, CompositeOfScalars, CompositeHasComposite, 1, 2>();
}