66ef6900f9
Previously we gave up immediately and just escaped. Instead, skip to the next close paren and see if we can continue parsing the next clause instead.
1311 lines
53 KiB
C
1311 lines
53 KiB
C
// RUN: %clang_cc1 %s -verify -fopenacc -std=c99
|
|
// RUNX: %clang_cc1 %s -verify -fopenacc
|
|
// RUNX: %clang_cc1 %s -verify -fopenacc -x c++
|
|
|
|
void func() {
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc enter data finalize
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc enter data finalize finalize
|
|
|
|
// expected-error@+2{{invalid OpenACC clause 'invalid'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc enter data finalize invalid
|
|
|
|
// expected-error@+2{{invalid OpenACC clause 'invalid'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc enter data finalize invalid invalid finalize
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc enter data seq finalize
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc host_data if_present
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc host_data if_present, if_present
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop seq independent auto
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop seq, independent auto
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop seq independent, auto
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc kernels loop seq independent auto
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop seq, independent auto
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel loop seq independent, auto
|
|
|
|
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop , seq
|
|
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop seq,
|
|
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop collapse
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop collapse()
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{invalid tag 'unknown' on 'collapse' clause}}
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop collapse(unknown:)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop collapse(force:)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{invalid tag 'unknown' on 'collapse' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop collapse(unknown:5)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop collapse(force:5)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop collapse(5)
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop collapse(5, 6)
|
|
for(;;){}
|
|
}
|
|
|
|
void DefaultClause() {
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop default
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default seq
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default, seq
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{expected identifier}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default(
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{invalid value for 'default' clause; expected 'present' or 'none'}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default( seq
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{expected identifier}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default(, seq
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected '('}}
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default)
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected '('}}
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default) seq
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected '('}}
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default), seq
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default()
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default() seq
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default(), seq
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{invalid value for 'default' clause; expected 'present' or 'none'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default(invalid)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{invalid value for 'default' clause; expected 'present' or 'none'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default(auto) seq
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{invalid value for 'default' clause; expected 'present' or 'none'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default(invalid), seq
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default(none)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial default(present), seq
|
|
for(;;){}
|
|
}
|
|
|
|
void IfClause() {
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop if
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if seq
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if, seq
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if(
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{use of undeclared identifier 'seq'}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if( seq
|
|
for(;;){}
|
|
|
|
// expected-error@+5{{expected expression}}
|
|
// expected-error@+4{{use of undeclared identifier 'seq'}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if(, seq
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected '('}}
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if)
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected '('}}
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if) seq
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected '('}}
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if), seq
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if()
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if() seq
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if(), seq
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'invalid_expr'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if(invalid_expr)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if() seq
|
|
for(;;){}
|
|
|
|
int i, j;
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if(i > j)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial if(1+5>3), seq
|
|
for(;;){}
|
|
}
|
|
|
|
void SyncClause() {
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop self
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop self, seq
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop self(
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{use of undeclared identifier 'seq'}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop self( seq
|
|
for(;;){}
|
|
|
|
// expected-error@+5{{expected expression}}
|
|
// expected-error@+4{{use of undeclared identifier 'seq'}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop self(, seq
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop self)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop self) seq
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop self), seq
|
|
for(;;){}
|
|
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop self(), seq
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected expression}}
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop self(,), seq
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'invalid_expr'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial loop self(invalid_expr), seq
|
|
for(;;){}
|
|
|
|
int i, j;
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial self(i > j
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{use of undeclared identifier 'seq'}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial self(i > j, seq
|
|
for(;;){}
|
|
|
|
// expected-warning@+2{{left operand of comma operator has no effect}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial self(i, j)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial self(i > j)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial self(1+5>3), seq
|
|
for(;;){}
|
|
}
|
|
|
|
struct Members {
|
|
int value;
|
|
char array[5];
|
|
};
|
|
struct HasMembersArray {
|
|
struct Members MemArr[4];
|
|
};
|
|
|
|
// On 'update', self behaves differently and requires parens, plus takes a var-list instead.
|
|
void SelfUpdate() {
|
|
struct Members s;
|
|
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc update self
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'zero'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc update self(zero : s.array[s.value : 5], s.value), seq
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc update self(s.array[s.value : 5], s.value), seq
|
|
for(;;){}
|
|
}
|
|
|
|
void VarListClauses() {
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy
|
|
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy, seq
|
|
|
|
// expected-error@+3{{expected '('}}
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy)
|
|
|
|
// expected-error@+3{{expected '('}}
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy), seq
|
|
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(
|
|
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(, seq
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy()
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(), seq
|
|
|
|
struct Members s;
|
|
struct HasMembersArray HasMem;
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(s.array[s.value]), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(s.array[s.value], s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(HasMem.MemArr[3].array[1]), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(HasMem.MemArr[3].array[1:4]), seq
|
|
|
|
// expected-error@+2{{OpenMP array section is not allowed here}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(HasMem.MemArr[1:3].array[1]), seq
|
|
|
|
// expected-error@+2{{OpenMP array section is not allowed here}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(HasMem.MemArr[1:3].array[1:2]), seq
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(HasMem.MemArr[:]), seq
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(HasMem.MemArr[::]), seq
|
|
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ']'}}
|
|
// expected-note@+2{{to match this '['}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(HasMem.MemArr[: :]), seq
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copy(HasMem.MemArr[3:]), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial use_device(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial use_device(s.array[s.value : 5]), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial no_create(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial no_create(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial present(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial present(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial deviceptr(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial deviceptr(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial attach(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial attach(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial detach(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial detach(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial private(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial private(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial firstprivate(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial firstprivate(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial delete(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial delete(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial use_device(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial use_device(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial device_resident(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial device_resident(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial link(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial link(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial host(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial host(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial device(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial device(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyout(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyout(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyout(zero:s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyout(zero : s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'zero'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyout(zero s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{invalid tag 'readonly' on 'copyout' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyout(readonly:s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{invalid tag 'invalid' on 'copyout' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyout(invalid:s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{invalid tag 'invalid' on 'copyout' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyout(invalid:s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'invalid'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyout(invalid s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial create(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial create(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial create(zero:s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial create(zero : s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'zero'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial create(zero s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{invalid tag 'readonly' on 'create' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial create(readonly:s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{invalid tag 'invalid' on 'create' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial create(invalid:s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{invalid tag 'invalid' on 'create' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial create(invalid:s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'invalid'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial create(invalid s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{expected ','}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyin(s.array[s.value] s.array[s.value :5] ), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyin(s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyin(readonly:s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyin(readonly : s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'readonly'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyin(readonly s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{invalid tag 'zero' on 'copyin' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyin(zero :s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{invalid tag 'invalid' on 'copyin' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyin(invalid:s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{invalid tag 'invalid' on 'copyin' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyin(invalid:s.array[s.value : 5], s.value), seq
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'invalid'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial copyin(invalid s.array[s.value : 5], s.value), seq
|
|
}
|
|
|
|
void ReductionClauseParsing() {
|
|
char *Begin, *End;
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction
|
|
// expected-error@+3{{missing reduction operator, expected '+', '*', 'max', 'min', '&', '|', '^', '&&', or '||', follwed by a ':'}}
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction()
|
|
// expected-error@+2{{missing reduction operator, expected '+', '*', 'max', 'min', '&', '|', '^', '&&', or '||', follwed by a ':'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction(Begin)
|
|
// expected-error@+2{{missing reduction operator, expected '+', '*', 'max', 'min', '&', '|', '^', '&&', or '||', follwed by a ':'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction(Begin, End)
|
|
// expected-error@+2{{missing reduction operator, expected '+', '*', 'max', 'min', '&', '|', '^', '&&', or '||', follwed by a ':'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction(Begin, End)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction(+:Begin)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction(+:Begin, End)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction(*: Begin, End)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction(max : Begin, End)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction(min: Begin, End)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction(&: Begin, End)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction(|: Begin, End)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction(^: Begin, End)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial seq, reduction(&&: Begin, End)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc serial reduction(||: Begin, End), seq
|
|
}
|
|
|
|
int returns_int();
|
|
|
|
void IntExprParsing() {
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel vector_length
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel vector_length()
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'invalid'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel vector_length(invalid)
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel vector_length(5, 4)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel vector_length(5)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel vector_length(returns_int())
|
|
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel num_gangs
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel num_gangs()
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'invalid'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel num_gangs(invalid)
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel num_gangs(5, 4)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel num_gangs(5)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel num_gangs(returns_int())
|
|
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel num_workers
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel num_workers()
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'invalid'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel num_workers(invalid)
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel num_workers(5, 4)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel num_workers(5)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel num_workers(returns_int())
|
|
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc init device_num
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc init device_num()
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'invalid'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc init device_num(invalid)
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc init device_num(5, 4)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc init device_num(5)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc init device_num(returns_int())
|
|
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc set default_async
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc set default_async()
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'invalid'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc set default_async(invalid)
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc set default_async(5, 4)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc set default_async(5)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc set default_async(returns_int())
|
|
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector()
|
|
// expected-error@+3{{invalid tag 'invalid' on 'vector' clause}}
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector(invalid:)
|
|
// expected-error@+2{{invalid tag 'invalid' on 'vector' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector(invalid:5)
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector(length:)
|
|
// expected-error@+3{{invalid tag 'num' on 'vector' clause}}
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector(num:)
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector(5, 4)
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector(length:6,4)
|
|
// expected-error@+4{{invalid tag 'num' on 'vector' clause}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector(num:6,4)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector(5)
|
|
// expected-error@+2{{invalid tag 'num' on 'vector' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector(num:5)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector(length:5)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector(returns_int())
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop vector(length:returns_int())
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker()
|
|
// expected-error@+3{{invalid tag 'invalid' on 'worker' clause}}
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker(invalid:)
|
|
// expected-error@+2{{invalid tag 'invalid' on 'worker' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker(invalid:5)
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker(num:)
|
|
// expected-error@+3{{invalid tag 'length' on 'worker' clause}}
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker(length:)
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker(5, 4)
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker(num:6,4)
|
|
// expected-error@+4{{invalid tag 'length' on 'worker' clause}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker(length:6,4)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker(5)
|
|
// expected-error@+2{{invalid tag 'length' on 'worker' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker(length:5)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker(num:5)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker(returns_int())
|
|
// expected-error@+2{{invalid tag 'length' on 'worker' clause}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop worker(length:returns_int())
|
|
}
|
|
|
|
void device_type() {
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype
|
|
|
|
// expected-error@+4{{expected identifier}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type(
|
|
// expected-error@+4{{expected identifier}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype(
|
|
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type()
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype()
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type(*
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype(*
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type(ident
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype(ident
|
|
|
|
// expected-error@+4{{expected ','}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type(ident ident2
|
|
// expected-error@+4{{expected ','}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype(ident ident2
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type(ident, ident2
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype(ident, ident2
|
|
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type(ident, ident2,)
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype(ident, ident2,)
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type(*,)
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype(*,)
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type(*,ident)
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype(*,ident)
|
|
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type(ident, *)
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype(ident, *)
|
|
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type("foo", 54)
|
|
// expected-error@+2{{expected identifier}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype(31, "bar")
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type(ident, auto, int, float)
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel dtype(ident, auto, int, float)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel device_type(ident, auto, int, float) dtype(ident, auto, int, float)
|
|
}
|
|
|
|
#define acc_async_sync -1
|
|
void AsyncArgument() {
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel async
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel async()
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'invalid'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel async(invalid)
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel async(4, 3)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel async(returns_int())
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel async(5)
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc parallel async(acc_async_sync)
|
|
}
|
|
|
|
void Tile() {
|
|
|
|
int* Foo;
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile
|
|
for(;;){}
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile(
|
|
for(;;){}
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile()
|
|
for(;;){}
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile(,
|
|
for(;;){}
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile(,)
|
|
for(;;){}
|
|
// expected-error@+2{{use of undeclared identifier 'invalid'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile(returns_int(), *, invalid, *)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile(returns_int() *, Foo, *)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{indirection requires pointer operand ('int' invalid)}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile(* returns_int() , *)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile(*)
|
|
for(;;){}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile(*Foo, *Foo)
|
|
for(;;){}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile(5)
|
|
for(;;){}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile(*, 5)
|
|
for(;;){}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile(5, *)
|
|
for(;;){}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop tile(5, *, 3, *)
|
|
for(;;){}
|
|
}
|
|
|
|
void Gang() {
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang
|
|
for(;;){}
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(
|
|
for(;;){}
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang()
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(5, *)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(*)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(5, num:*)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(num:5, *)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(num:5, num:*)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(num:*)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(dim:5)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(dim:5, dim:*)
|
|
for(;;){}
|
|
|
|
// expected-error@+2{{expected expression}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(dim:*)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(static:*)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(static:*, static:5)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(static:*, 5)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(static:45, 5)
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(static:45,
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(static:45
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(static:*,
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(static:*
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(45,
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(45
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(num:45,
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(num:45
|
|
for(;;){}
|
|
|
|
// expected-error@+4{{expected expression}}
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(dim:45,
|
|
for(;;){}
|
|
|
|
// expected-error@+3{{expected ')'}}
|
|
// expected-note@+2{{to match this '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(dim:45
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(static:*, dim:returns_int(), 5)
|
|
for(;;){}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc loop gang(num: 32, static:*, dim:returns_int(), 5)
|
|
for(;;){}
|
|
|
|
}
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc routine worker, vector, seq, nohost
|
|
void bar();
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc routine(bar) worker, vector, seq, nohost
|
|
|
|
|
|
// Bind Clause Parsing.
|
|
|
|
// expected-error@+2{{expected '('}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc routine bind
|
|
void BCP1();
|
|
|
|
// expected-error@+2{{expected identifier or string literal}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc routine(BCP1) bind()
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc routine bind("ReductionClauseParsing")
|
|
void BCP2();
|
|
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc routine(BCP1) bind(BCP2)
|
|
|
|
// expected-error@+2{{use of undeclared identifier 'unknown_thing'}}
|
|
// expected-warning@+1{{OpenACC directives not yet implemented, pragma ignored}}
|
|
#pragma acc routine(BCP1) bind(unknown_thing)
|