2015-05-20 12:24:19 +08:00
// RUN: %clang_cc1 -fsyntax-only -fopenmp -verify %s
2014-09-18 13:12:34 +08:00
// expected-error@+1 {{unexpected OpenMP directive '#pragma omp for simd'}}
# pragma omp for simd
// expected-error@+1 {{unexpected OpenMP directive '#pragma omp for simd'}}
# pragma omp for simd foo
void test_no_clause ( ) {
int i ;
# pragma omp for simd
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{statement after '#pragma omp for simd' must be a for loop}}
# pragma omp for simd
+ + i ;
}
void test_branch_protected_scope ( ) {
int i = 0 ;
L1 :
+ + i ;
int x [ 24 ] ;
# pragma omp parallel
# pragma omp for simd
for ( i = 0 ; i < 16 ; + + i ) {
if ( i = = 5 )
goto L1 ; // expected-error {{use of undeclared label 'L1'}}
else if ( i = = 6 )
return ; // expected-error {{cannot return from OpenMP region}}
else if ( i = = 7 )
goto L2 ;
else if ( i = = 8 ) {
L2 :
x [ i ] + + ;
}
}
if ( x [ 0 ] = = 0 )
goto L2 ; // expected-error {{use of undeclared label 'L2'}}
else if ( x [ 1 ] = = 1 )
goto L1 ;
}
void test_invalid_clause ( ) {
int i ;
# pragma omp parallel
// expected-warning@+1 {{extra tokens at the end of '#pragma omp for simd' are ignored}}
# pragma omp for simd foo bar
for ( i = 0 ; i < 16 ; + + i )
;
}
void test_non_identifiers ( ) {
int i , x ;
# pragma omp parallel
// expected-warning@+1 {{extra tokens at the end of '#pragma omp for simd' are ignored}}
# pragma omp for simd;
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-warning@+1 {{extra tokens at the end of '#pragma omp for simd' are ignored}}
# pragma omp for simd linear(x);
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-warning@+1 {{extra tokens at the end of '#pragma omp for simd' are ignored}}
# pragma omp for simd private(x);
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-warning@+1 {{extra tokens at the end of '#pragma omp for simd' are ignored}}
# pragma omp for simd, private(x);
for ( i = 0 ; i < 16 ; + + i )
;
}
extern int foo ( ) ;
void test_safelen ( ) {
int i ;
// expected-error@+1 {{expected '('}}
# pragma omp for simd safelen
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd safelen(
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}}
# pragma omp for simd safelen()
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd safelen(,
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd safelen(, )
for ( i = 0 ; i < 16 ; + + i )
;
// expected-warning@+2 {{extra tokens at the end of '#pragma omp for simd' are ignored}}
// expected-error@+1 {{expected '('}}
# pragma omp for simd safelen 4)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}}
# pragma omp for simd safelen(4
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}}
# pragma omp for simd safelen(4,
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}}
# pragma omp for simd safelen(4, )
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp for simd safelen(4)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}}
# pragma omp for simd safelen(4 4)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}}
# pragma omp for simd safelen(4, , 4)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp for simd safelen(4)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}}
# pragma omp for simd safelen(4, 8)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expression is not an integer constant expression}}
# pragma omp for simd safelen(2.5)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expression is not an integer constant expression}}
# pragma omp for simd safelen(foo())
for ( i = 0 ; i < 16 ; + + i )
;
2015-12-01 18:17:31 +08:00
// expected-error@+1 {{argument to 'safelen' clause must be a strictly positive integer value}}
2014-09-18 13:12:34 +08:00
# pragma omp for simd safelen(-5)
for ( i = 0 ; i < 16 ; + + i )
;
2015-12-01 18:17:31 +08:00
// expected-error@+1 {{argument to 'safelen' clause must be a strictly positive integer value}}
2014-09-18 13:12:34 +08:00
# pragma omp for simd safelen(0)
for ( i = 0 ; i < 16 ; + + i )
;
2015-12-01 18:17:31 +08:00
// expected-error@+1 {{argument to 'safelen' clause must be a strictly positive integer value}}
2014-09-18 13:12:34 +08:00
# pragma omp for simd safelen(5 - 5)
for ( i = 0 ; i < 16 ; + + i )
;
}
2015-08-21 19:14:16 +08:00
void test_simdlen ( ) {
int i ;
// expected-error@+1 {{expected '('}}
# pragma omp for simd simdlen
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd simdlen(
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}}
# pragma omp for simd simdlen()
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd simdlen(,
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd simdlen(, )
for ( i = 0 ; i < 16 ; + + i )
;
// expected-warning@+2 {{extra tokens at the end of '#pragma omp for simd' are ignored}}
// expected-error@+1 {{expected '('}}
# pragma omp for simd simdlen 4)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}}
# pragma omp for simd simdlen(4
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}}
# pragma omp for simd simdlen(4,
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}}
# pragma omp for simd simdlen(4, )
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp for simd simdlen(4)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}}
# pragma omp for simd simdlen(4 4)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}}
# pragma omp for simd simdlen(4, , 4)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp for simd simdlen(4)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}}
# pragma omp for simd simdlen(4, 8)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expression is not an integer constant expression}}
# pragma omp for simd simdlen(2.5)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expression is not an integer constant expression}}
# pragma omp for simd simdlen(foo())
for ( i = 0 ; i < 16 ; + + i )
;
2015-12-01 18:17:31 +08:00
// expected-error@+1 {{argument to 'simdlen' clause must be a strictly positive integer value}}
2015-08-21 19:14:16 +08:00
# pragma omp for simd simdlen(-5)
for ( i = 0 ; i < 16 ; + + i )
;
2015-12-01 18:17:31 +08:00
// expected-error@+1 {{argument to 'simdlen' clause must be a strictly positive integer value}}
2015-08-21 19:14:16 +08:00
# pragma omp for simd simdlen(0)
for ( i = 0 ; i < 16 ; + + i )
;
2015-12-01 18:17:31 +08:00
// expected-error@+1 {{argument to 'simdlen' clause must be a strictly positive integer value}}
2015-08-21 19:14:16 +08:00
# pragma omp for simd simdlen(5 - 5)
for ( i = 0 ; i < 16 ; + + i )
;
}
void test_safelen_simdlen ( ) {
int i ;
// expected-error@+1 {{the value of 'simdlen' parameter must be less than or equal to the value of the 'safelen' parameter}}
# pragma omp for simd simdlen(6) safelen(5)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{the value of 'simdlen' parameter must be less than or equal to the value of the 'safelen' parameter}}
# pragma omp for simd safelen(5) simdlen(6)
for ( i = 0 ; i < 16 ; + + i )
;
}
2014-09-18 13:12:34 +08:00
void test_collapse ( ) {
int i ;
# pragma omp parallel
// expected-error@+1 {{expected '('}}
# pragma omp for simd collapse
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd collapse(
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected expression}}
# pragma omp for simd collapse()
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd collapse(,
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd collapse(, )
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-warning@+2 {{extra tokens at the end of '#pragma omp for simd' are ignored}}
// expected-error@+1 {{expected '('}}
# pragma omp for simd collapse 4)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}}
# pragma omp for simd collapse(4
for ( i = 0 ; i < 16 ; + + i )
; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}}
# pragma omp parallel
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}}
# pragma omp for simd collapse(4,
for ( i = 0 ; i < 16 ; + + i )
; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}}
# pragma omp parallel
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}}
# pragma omp for simd collapse(4, )
for ( i = 0 ; i < 16 ; + + i )
; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}}
# pragma omp parallel
// expected-note@+1 {{as specified in 'collapse' clause}}
# pragma omp for simd collapse(4)
for ( i = 0 ; i < 16 ; + + i )
; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}}
# pragma omp parallel
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}}
# pragma omp for simd collapse(4 4)
for ( i = 0 ; i < 16 ; + + i )
; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}}
# pragma omp parallel
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}}
# pragma omp for simd collapse(4, , 4)
for ( i = 0 ; i < 16 ; + + i )
; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}}
# pragma omp parallel
# pragma omp for simd collapse(4)
for ( int i1 = 0 ; i1 < 16 ; + + i1 )
for ( int i2 = 0 ; i2 < 16 ; + + i2 )
for ( int i3 = 0 ; i3 < 16 ; + + i3 )
for ( int i4 = 0 ; i4 < 16 ; + + i4 )
foo ( ) ;
# pragma omp parallel
// expected-error@+2 {{expected ')'}}
// expected-note@+1 {{to match this '('}} expected-note@+1 {{as specified in 'collapse' clause}}
# pragma omp for simd collapse(4, 8)
for ( i = 0 ; i < 16 ; + + i )
; // expected-error {{expected 4 for loops after '#pragma omp for simd', but found only 1}}
# pragma omp parallel
// expected-error@+1 {{expression is not an integer constant expression}}
# pragma omp for simd collapse(2.5)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expression is not an integer constant expression}}
# pragma omp for simd collapse(foo())
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
2015-12-01 18:17:31 +08:00
// expected-error@+1 {{argument to 'collapse' clause must be a strictly positive integer value}}
2014-09-18 13:12:34 +08:00
# pragma omp for simd collapse(-5)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
2015-12-01 18:17:31 +08:00
// expected-error@+1 {{argument to 'collapse' clause must be a strictly positive integer value}}
2014-09-18 13:12:34 +08:00
# pragma omp for simd collapse(0)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
2015-12-01 18:17:31 +08:00
// expected-error@+1 {{argument to 'collapse' clause must be a strictly positive integer value}}
2014-09-18 13:12:34 +08:00
# pragma omp for simd collapse(5 - 5)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
# pragma omp for simd collapse(2)
for ( i = 0 ; i < 16 ; + + i )
// expected-note@+1 {{variable with automatic storage duration is predetermined as private; perhaps you forget to enclose 'omp for simd' directive into a parallel or another task region?}}
for ( int j = 0 ; j < 16 ; + + j )
2015-12-10 16:20:58 +08:00
// expected-error@+2 {{reduction variable must be shared}}
2014-09-18 13:12:34 +08:00
// expected-error@+1 {{OpenMP constructs may not be nested inside a simd region}}
# pragma omp for simd reduction(+ : i, j)
for ( int k = 0 ; k < 16 ; + + k )
i + = j ;
}
void test_linear ( ) {
int i ;
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd linear(
for ( i = 0 ; i < 16 ; + + i )
;
2016-04-01 16:43:42 +08:00
// expected-error@+2 {{expected expression}}
2014-09-18 13:12:34 +08:00
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd linear(,
for ( i = 0 ; i < 16 ; + + i )
;
2016-04-01 16:43:42 +08:00
// expected-error@+2 {{expected expression}}
2014-09-18 13:12:34 +08:00
// expected-error@+1 {{expected expression}}
# pragma omp for simd linear(, )
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}}
# pragma omp for simd linear()
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}}
# pragma omp for simd linear(int)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected variable name}}
# pragma omp for simd linear(0)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{use of undeclared identifier 'x'}}
# pragma omp for simd linear(x)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{use of undeclared identifier 'x'}}
// expected-error@+1 {{use of undeclared identifier 'y'}}
# pragma omp for simd linear(x, y)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+3 {{use of undeclared identifier 'x'}}
// expected-error@+2 {{use of undeclared identifier 'y'}}
// expected-error@+1 {{use of undeclared identifier 'z'}}
# pragma omp for simd linear(x, y, z)
for ( i = 0 ; i < 16 ; + + i )
;
int x , y ;
// expected-error@+1 {{expected expression}}
# pragma omp for simd linear(x :)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd linear(x :, )
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp for simd linear(x : 1)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp for simd linear(x : 2 * 2)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd linear(x : 1, y)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd linear(x : 1, y, z : 1)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-note@+2 {{defined as linear}}
// expected-error@+1 {{linear variable cannot be linear}}
# pragma omp for simd linear(x) linear(x)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-note@+2 {{defined as private}}
// expected-error@+1 {{private variable cannot be linear}}
# pragma omp for simd private(x) linear(x)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-note@+2 {{defined as linear}}
// expected-error@+1 {{linear variable cannot be private}}
# pragma omp for simd linear(x) private(x)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-warning@+1 {{zero linear step (x and other variables in clause should probably be const)}}
# pragma omp for simd linear(x, y : 0)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-note@+2 {{defined as linear}}
// expected-error@+1 {{linear variable cannot be lastprivate}}
# pragma omp for simd linear(x) lastprivate(x)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-note@+2 {{defined as lastprivate}}
// expected-error@+1 {{lastprivate variable cannot be linear}}
# pragma omp for simd lastprivate(x) linear(x)
for ( i = 0 ; i < 16 ; + + i )
;
}
void test_aligned ( ) {
int i ;
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd aligned(
for ( i = 0 ; i < 16 ; + + i )
;
2016-04-01 16:43:42 +08:00
// expected-error@+2 {{expected expression}}
2014-09-18 13:12:34 +08:00
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd aligned(,
for ( i = 0 ; i < 16 ; + + i )
;
2016-04-01 16:43:42 +08:00
// expected-error@+2 {{expected expression}}
2014-09-18 13:12:34 +08:00
// expected-error@+1 {{expected expression}}
# pragma omp for simd aligned(, )
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}}
# pragma omp for simd aligned()
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}}
# pragma omp for simd aligned(int)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected variable name}}
# pragma omp for simd aligned(0)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{use of undeclared identifier 'x'}}
# pragma omp for simd aligned(x)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+2 {{use of undeclared identifier 'x'}}
// expected-error@+1 {{use of undeclared identifier 'y'}}
# pragma omp for simd aligned(x, y)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+3 {{use of undeclared identifier 'x'}}
// expected-error@+2 {{use of undeclared identifier 'y'}}
// expected-error@+1 {{use of undeclared identifier 'z'}}
# pragma omp for simd aligned(x, y, z)
for ( i = 0 ; i < 16 ; + + i )
;
int * x , y , z [ 25 ] ; // expected-note 4 {{'y' defined here}}
# pragma omp for simd aligned(x)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp for simd aligned(z)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}}
# pragma omp for simd aligned(x :)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected expression}} expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd aligned(x :, )
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp for simd aligned(x : 1)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp for simd aligned(x : 2 * 2)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd aligned(x : 1, y)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd aligned(x : 1, y, z : 1)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{argument of aligned clause should be array or pointer, not 'int'}}
# pragma omp for simd aligned(x, y)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-error@+1 {{argument of aligned clause should be array or pointer, not 'int'}}
# pragma omp for simd aligned(x, y, z)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-note@+2 {{defined as aligned}}
// expected-error@+1 {{a variable cannot appear in more than one aligned clause}}
# pragma omp for simd aligned(x) aligned(z, x)
for ( i = 0 ; i < 16 ; + + i )
;
// expected-note@+3 {{defined as aligned}}
// expected-error@+2 {{a variable cannot appear in more than one aligned clause}}
// expected-error@+1 2 {{argument of aligned clause should be array or pointer, not 'int'}}
# pragma omp for simd aligned(x, y, z) aligned(y, z)
for ( i = 0 ; i < 16 ; + + i )
;
}
void test_private ( ) {
int i ;
# pragma omp parallel
// expected-error@+2 {{expected expression}}
// expected-error@+1 {{expected ')'}} expected-note@+1 {{to match this '('}}
# pragma omp for simd private(
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}}
2016-04-01 16:43:42 +08:00
// expected-error@+1 2 {{expected expression}}
2014-09-18 13:12:34 +08:00
# pragma omp for simd private(,
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
2016-04-01 16:43:42 +08:00
// expected-error@+1 2 {{expected expression}}
2014-09-18 13:12:34 +08:00
# pragma omp for simd private(, )
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected expression}}
# pragma omp for simd private()
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected expression}}
# pragma omp for simd private(int)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected variable name}}
# pragma omp for simd private(0)
for ( i = 0 ; i < 16 ; + + i )
;
int x , y , z ;
# pragma omp parallel
# pragma omp for simd private(x)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
# pragma omp for simd private(x, y)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
# pragma omp for simd private(x, y, z)
for ( i = 0 ; i < 16 ; + + i ) {
x = y * i + z ;
}
}
void test_lastprivate ( ) {
int i ;
# pragma omp parallel
// expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}}
// expected-error@+1 {{expected expression}}
# pragma omp for simd lastprivate(
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}}
2016-04-01 16:43:42 +08:00
// expected-error@+1 2 {{expected expression}}
2014-09-18 13:12:34 +08:00
# pragma omp for simd lastprivate(,
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
2016-04-01 16:43:42 +08:00
// expected-error@+1 2 {{expected expression}}
2014-09-18 13:12:34 +08:00
# pragma omp for simd lastprivate(, )
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected expression}}
# pragma omp for simd lastprivate()
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected expression}}
# pragma omp for simd lastprivate(int)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected variable name}}
# pragma omp for simd lastprivate(0)
for ( i = 0 ; i < 16 ; + + i )
;
int x , y , z ;
# pragma omp parallel
# pragma omp for simd lastprivate(x)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
# pragma omp for simd lastprivate(x, y)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
# pragma omp for simd lastprivate(x, y, z)
for ( i = 0 ; i < 16 ; + + i )
;
}
void test_firstprivate ( ) {
int i ;
# pragma omp parallel
// expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}}
// expected-error@+1 {{expected expression}}
# pragma omp for simd firstprivate(
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+2 {{expected ')'}} expected-note@+2 {{to match this '('}}
2016-04-01 16:43:42 +08:00
// expected-error@+1 2 {{expected expression}}
2014-09-18 13:12:34 +08:00
# pragma omp for simd firstprivate(,
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
2016-04-01 16:43:42 +08:00
// expected-error@+1 2 {{expected expression}}
2014-09-18 13:12:34 +08:00
# pragma omp for simd firstprivate(, )
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected expression}}
# pragma omp for simd firstprivate()
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected expression}}
# pragma omp for simd firstprivate(int)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
// expected-error@+1 {{expected variable name}}
# pragma omp for simd firstprivate(0)
for ( i = 0 ; i < 16 ; + + i )
;
int x , y , z ;
# pragma omp parallel
# pragma omp for simd lastprivate(x) firstprivate(x)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
# pragma omp for simd lastprivate(x, y) firstprivate(x, y)
for ( i = 0 ; i < 16 ; + + i )
;
# pragma omp parallel
# pragma omp for simd lastprivate(x, y, z) firstprivate(x, y, z)
for ( i = 0 ; i < 16 ; + + i )
;
}
void test_loop_messages ( ) {
float a [ 100 ] , b [ 100 ] , c [ 100 ] ;
# pragma omp parallel
// expected-error@+2 {{variable must be of integer or pointer type}}
# pragma omp for simd
for ( float fi = 0 ; fi < 10.0 ; fi + + ) {
c [ ( int ) fi ] = a [ ( int ) fi ] + b [ ( int ) fi ] ;
}
# pragma omp parallel
// expected-error@+2 {{variable must be of integer or pointer type}}
# pragma omp for simd
for ( double fi = 0 ; fi < 10.0 ; fi + + ) {
c [ ( int ) fi ] = a [ ( int ) fi ] + b [ ( int ) fi ] ;
}
}