1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60
|
// RUN: %clang_cc1 %s -fopenacc -verify
short getS();
float getF();
void Test() {
#pragma acc kernels loop num_gangs(1)
for(int i = 5; i < 10;++i);
// expected-error@+1{{OpenACC 'num_gangs' clause is not valid on 'serial loop' directive}}
#pragma acc serial loop num_gangs(1)
for(int i = 5; i < 10;++i);
#pragma acc parallel loop num_gangs(1)
for(int i = 5; i < 10;++i);
// expected-error@+2{{OpenACC 'num_gangs' clause cannot appear more than once on a 'kernels loop' directive}}
// expected-note@+1{{previous 'num_gangs' clause is here}}
#pragma acc kernels loop num_gangs(1) num_gangs(2)
for(int i = 5; i < 10;++i);
// expected-error@+2{{OpenACC 'num_gangs' clause cannot appear more than once on a 'parallel loop' directive}}
// expected-note@+1{{previous 'num_gangs' clause is here}}
#pragma acc parallel loop num_gangs(1) num_gangs(2)
for(int i = 5; i < 10;++i);
// expected-error@+3{{OpenACC 'num_gangs' clause cannot appear more than once in a 'device_type' region on a 'kernels loop' directive}}
// expected-note@+2{{previous 'num_gangs' clause is here}}
// expected-note@+1{{active 'device_type' clause here}}
#pragma acc kernels loop num_gangs(1) device_type(*) num_gangs(1) num_gangs(2)
for(int i = 5; i < 10;++i);
// expected-error@+3{{OpenACC 'num_gangs' clause cannot appear more than once in a 'device_type' region on a 'parallel loop' directive}}
// expected-note@+2{{previous 'num_gangs' clause is here}}
// expected-note@+1{{active 'device_type' clause here}}
#pragma acc parallel loop device_type(*) num_gangs(1) num_gangs(2)
for(int i = 5; i < 10;++i);
#pragma acc parallel loop num_gangs(1) device_type(*) num_gangs(2)
for(int i = 5; i < 10;++i);
// expected-error@+1{{OpenACC clause 'num_gangs' requires expression of integer type}}
#pragma acc parallel loop num_gangs(getF())
for(int i = 5; i < 10;++i);
// expected-error@+1{{expected expression}}
#pragma acc kernels loop num_gangs()
for(int i = 5; i < 10;++i);
// expected-error@+1{{expected expression}}
#pragma acc parallel loop num_gangs()
for(int i = 5; i < 10;++i);
// expected-error@+1{{too many integer expression arguments provided to OpenACC 'num_gangs' clause: 'kernels loop' directive expects maximum of 1, 2 were provided}}
#pragma acc kernels loop num_gangs(1, getS())
for(int i = 5; i < 10;++i);
// expected-error@+1{{too many integer expression arguments provided to OpenACC 'num_gangs' clause: 'parallel loop' directive expects maximum of 3, 4 were provided}}
#pragma acc parallel loop num_gangs(getS(), 1, getS(), 1)
for(int i = 5; i < 10;++i);
}
|