2b939e182d
These three clauses are all quite trivial, as they take no parameters. They are mutually exclusive, and 'seq' has some other exclusives that are implemented here. The ONE thing that isn't implemented is 2.9's restriction (line 2010): 'A loop associated with a 'loop' construct that does not have a 'seq' clause must be written to meet all the following conditions'. Future clauses will require similar work, so it'll be done as a followup.
57 lines
2.2 KiB
C
57 lines
2.2 KiB
C
// RUN: %clang_cc1 %s -fopenacc -verify
|
|
|
|
void SingleOnly() {
|
|
#pragma acc parallel default(none)
|
|
while(0);
|
|
|
|
// expected-error@+2{{OpenACC 'default' clause cannot appear more than once on a 'serial' directive}}
|
|
// expected-note@+1{{previous clause is here}}
|
|
#pragma acc serial default(present) self default(none)
|
|
while(0);
|
|
|
|
int i;
|
|
|
|
// expected-error@+2{{OpenACC 'default' clause cannot appear more than once on a 'kernels' directive}}
|
|
// expected-note@+1{{previous clause is here}}
|
|
#pragma acc kernels self default(present) present(i) default(none) copy(i)
|
|
while(0);
|
|
|
|
// expected-warning@+6{{OpenACC construct 'parallel loop' not yet implemented}}
|
|
// expected-warning@+5{{OpenACC clause 'self' not yet implemented}}
|
|
// expected-warning@+4{{OpenACC clause 'default' not yet implemented}}
|
|
// expected-warning@+3{{OpenACC clause 'private' not yet implemented}}
|
|
// expected-warning@+2{{OpenACC clause 'default' not yet implemented}}
|
|
// expected-warning@+1{{OpenACC clause 'copy' not yet implemented}}
|
|
#pragma acc parallel loop self default(present) private(i) default(none) copy(i)
|
|
while(0);
|
|
|
|
// expected-warning@+3{{OpenACC clause 'self' not yet implemented, clause ignored}}
|
|
// expected-warning@+2{{OpenACC construct 'serial loop' not yet implemented}}
|
|
// expected-error@+1{{expected '('}}
|
|
#pragma acc serial loop self default private(i) default(none) if(i)
|
|
while(0);
|
|
|
|
// expected-warning@+2{{OpenACC construct 'kernels loop' not yet implemented}}
|
|
// expected-warning@+1{{OpenACC clause 'default' not yet implemented}}
|
|
#pragma acc kernels loop default(none)
|
|
while(0);
|
|
|
|
// expected-warning@+2{{OpenACC construct 'data' not yet implemented}}
|
|
// expected-warning@+1{{OpenACC clause 'default' not yet implemented}}
|
|
#pragma acc data default(none)
|
|
while(0);
|
|
|
|
// expected-error@+1{{OpenACC 'default' clause is not valid on 'loop' directive}}
|
|
#pragma acc loop default(none)
|
|
for(;;);
|
|
|
|
// expected-warning@+2{{OpenACC construct 'wait' not yet implemented}}
|
|
// expected-error@+1{{OpenACC 'default' clause is not valid on 'wait' directive}}
|
|
#pragma acc wait default(none)
|
|
while(0);
|
|
|
|
// expected-error@+1{{OpenACC 'default' clause is not valid on 'loop' directive}}
|
|
#pragma acc loop default(present)
|
|
for(;;);
|
|
}
|