2015-05-20 12:24:19 +08:00
// RUN: %clang_cc1 -verify -fopenmp %s
2014-06-26 20:05:45 +08:00
void foo ( ) {
}
bool foobool ( int argc ) {
return argc ;
}
struct S1 ; // expected-note 2 {{declared here}} expected-note 2 {{forward declaration of 'S1'}}
extern S1 a ;
class S2 {
mutable int a ;
public :
S2 ( ) : a ( 0 ) { }
2014-10-08 22:01:46 +08:00
S2 ( const S2 & s2 ) : a ( s2 . a ) { }
2014-06-26 20:05:45 +08:00
static float S2s ;
static const float S2sc ;
} ;
const float S2 : : S2sc = 0 ;
const S2 b ;
const S2 ba [ 5 ] ;
class S3 {
int a ;
S3 & operator = ( const S3 & s3 ) ;
public :
S3 ( ) : a ( 0 ) { }
2014-10-08 22:01:46 +08:00
S3 ( const S3 & s3 ) : a ( s3 . a ) { }
2014-06-26 20:05:45 +08:00
} ;
const S3 c ;
const S3 ca [ 5 ] ;
extern const int f ;
2014-10-08 22:01:46 +08:00
class S4 {
2014-06-26 20:05:45 +08:00
int a ;
S4 ( ) ;
2014-10-08 22:01:46 +08:00
S4 ( const S4 & s4 ) ; // expected-note 2 {{implicitly declared private here}}
2014-06-26 20:05:45 +08:00
public :
S4 ( int v ) : a ( v ) { }
} ;
2014-10-08 22:01:46 +08:00
class S5 {
2014-06-26 20:05:45 +08:00
int a ;
2014-10-08 22:01:46 +08:00
S5 ( const S5 & s5 ) : a ( s5 . a ) { } // expected-note 4 {{implicitly declared private here}}
2014-06-26 20:05:45 +08:00
public :
S5 ( ) : a ( 0 ) { }
S5 ( int v ) : a ( v ) { }
} ;
class S6 {
int a ;
S6 ( ) : a ( 0 ) { }
public :
S6 ( const S6 & s6 ) : a ( s6 . a ) { }
S6 ( int v ) : a ( v ) { }
} ;
S3 h ;
# pragma omp threadprivate(h) // expected-note 2 {{defined as threadprivate or thread local}}
template < class I , class C >
int foomain ( int argc , char * * argv ) {
2014-10-08 22:01:46 +08:00
I e ( 4 ) ;
C g ( 5 ) ;
2014-06-26 20:05:45 +08:00
int i ;
2015-08-18 14:47:21 +08:00
int & j = i ;
2014-06-26 20:05:45 +08:00
# pragma omp parallel
# pragma omp single firstprivate // expected-error {{expected '(' after 'firstprivate'}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate() // expected-error {{expected expression}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
foo ( ) ;
# pragma omp parallel
2016-03-31 17:13:44 +08:00
# pragma omp single firstprivate(argc, // expected-error {{expected ')'}} expected-note {{to match this '('}}
2014-06-26 20:05:45 +08:00
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(argc)
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(S1) // expected-error {{'S1' does not refer to a value}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(a, b) // expected-error {{firstprivate variable with incomplete type 'S1'}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(argv[1]) // expected-error {{expected variable name}}
foo ( ) ;
# pragma omp parallel
2014-10-08 22:01:46 +08:00
# pragma omp single firstprivate(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}
2014-06-26 20:05:45 +08:00
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(h) // expected-error {{threadprivate or thread local variable cannot be firstprivate}}
foo ( ) ;
# pragma omp parallel
# pragma omp single linear(i) // expected-error {{unexpected OpenMP clause 'linear' in directive '#pragma omp single'}}
foo ( ) ;
# pragma omp parallel
{
int v = 0 ;
int i ; // expected-note {{variable with automatic storage duration is predetermined as private; perhaps you forget to enclose 'omp single' directive into a parallel or another task region?}}
2015-12-10 16:20:58 +08:00
# pragma omp single firstprivate(i) // expected-error {{firstprivate variable must be shared}}
2014-06-26 20:05:45 +08:00
foo ( ) ;
v + = i ;
}
# pragma omp parallel shared(i)
# pragma omp parallel private(i)
2015-08-18 14:47:21 +08:00
# pragma omp single firstprivate(j)
2014-06-26 20:05:45 +08:00
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(i)
foo ( ) ;
# pragma omp parallel
2014-10-08 22:01:46 +08:00
# pragma omp single firstprivate(g) // expected-error {{calling a private constructor of class 'S5'}}
2014-06-26 20:05:45 +08:00
foo ( ) ;
# pragma omp parallel private(i) // expected-note {{defined as private}}
# pragma omp single firstprivate(i) // expected-error {{firstprivate variable must be shared}}
foo ( ) ;
# pragma omp parallel reduction(+ : i) // expected-note {{defined as reduction}}
# pragma omp single firstprivate(i) // expected-error {{firstprivate variable must be shared}}
foo ( ) ;
return 0 ;
}
2015-04-16 21:49:42 +08:00
namespace A {
double x ;
# pragma omp threadprivate(x) // expected-note {{defined as threadprivate or thread local}}
}
namespace B {
using A : : x ;
}
2014-06-26 20:05:45 +08:00
int main ( int argc , char * * argv ) {
const int d = 5 ;
const int da [ 5 ] = { 0 } ;
2014-10-08 22:01:46 +08:00
S4 e ( 4 ) ;
S5 g ( 5 ) ;
2014-06-26 20:05:45 +08:00
S3 m ;
S6 n ( 2 ) ;
int i ;
2015-08-18 14:47:21 +08:00
int & j = i ;
2014-06-26 20:05:45 +08:00
# pragma omp parallel
# pragma omp single firstprivate // expected-error {{expected '(' after 'firstprivate'}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate( // expected-error {{expected expression}} expected-error {{expected ')'}} expected-note {{to match this '('}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate() // expected-error {{expected expression}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(argc // expected-error {{expected ')'}} expected-note {{to match this '('}}
foo ( ) ;
# pragma omp parallel
2016-03-31 17:13:44 +08:00
# pragma omp single firstprivate(argc, // expected-error {{expected ')'}} expected-note {{to match this '('}}
2014-06-26 20:05:45 +08:00
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(argc > 0 ? argv[1] : argv[2]) // expected-error {{expected variable name}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(argc)
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(S1) // expected-error {{'S1' does not refer to a value}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(a, b, c, d, f) // expected-error {{firstprivate variable with incomplete type 'S1'}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(argv[1]) // expected-error {{expected variable name}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(2 * 2) // expected-error {{expected variable name}}
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(ba) // OK
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(ca) // OK
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(da) // OK
foo ( ) ;
int xa ;
# pragma omp parallel
# pragma omp single firstprivate(xa) // OK
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(S2::S2s) // OK
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(S2::S2sc) // OK
foo ( ) ;
# pragma omp parallel
# pragma omp single safelen(5) // expected-error {{unexpected OpenMP clause 'safelen' in directive '#pragma omp single'}}
foo ( ) ;
# pragma omp parallel
2014-10-08 22:01:46 +08:00
# pragma omp single firstprivate(e, g) // expected-error {{calling a private constructor of class 'S4'}} expected-error {{calling a private constructor of class 'S5'}}
2014-06-26 20:05:45 +08:00
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(m) // OK
foo ( ) ;
# pragma omp parallel
2015-04-16 21:49:42 +08:00
# pragma omp single firstprivate(h, B::x) // expected-error 2 {{threadprivate or thread local variable cannot be firstprivate}}
2014-06-26 20:05:45 +08:00
foo ( ) ;
# pragma omp parallel
# pragma omp single private(xa), firstprivate(xa) // expected-error {{private variable cannot be firstprivate}} expected-note {{defined as private}}
foo ( ) ;
# pragma omp parallel shared(xa)
# pragma omp single firstprivate(xa) // OK: may be firstprivate
foo ( ) ;
# pragma omp parallel
2015-08-18 14:47:21 +08:00
# pragma omp single firstprivate(j)
2014-06-26 20:05:45 +08:00
foo ( ) ;
# pragma omp parallel
2014-10-08 22:01:46 +08:00
# pragma omp single firstprivate(g) // expected-error {{calling a private constructor of class 'S5'}}
2014-06-26 20:05:45 +08:00
foo ( ) ;
# pragma omp parallel
# pragma omp single firstprivate(n) // OK
foo ( ) ;
# pragma omp parallel
{
int v = 0 ;
int i ; // expected-note {{variable with automatic storage duration is predetermined as private; perhaps you forget to enclose 'omp single' directive into a parallel or another task region?}}
2015-12-10 16:20:58 +08:00
# pragma omp single firstprivate(i) // expected-error {{firstprivate variable must be shared}}
2014-06-26 20:05:45 +08:00
foo ( ) ;
v + = i ;
}
# pragma omp parallel private(i) // expected-note {{defined as private}}
# pragma omp single firstprivate(i) // expected-error {{firstprivate variable must be shared}}
foo ( ) ;
# pragma omp parallel reduction(+ : i) // expected-note {{defined as reduction}}
# pragma omp single firstprivate(i) // expected-error {{firstprivate variable must be shared}}
foo ( ) ;
2015-09-16 02:56:58 +08:00
static int t ;
# pragma omp single firstprivate(t) // OK
foo ( ) ;
2014-06-26 20:05:45 +08:00
return foomain < S4 , S5 > ( argc , argv ) ; // expected-note {{in instantiation of function template specialization 'foomain<S4, S5>' requested here}}
}