/* Test that creal and cimag built-in functions do not return lvalues. */
|
/* Test that creal and cimag built-in functions do not return lvalues. */
|
/* Origin: Joseph Myers <jsm@polyomino.org.uk> */
|
/* Origin: Joseph Myers <jsm@polyomino.org.uk> */
|
/* { dg-do compile } */
|
/* { dg-do compile } */
|
/* { dg-options "" } */
|
/* { dg-options "" } */
|
|
|
extern float crealf (float _Complex);
|
extern float crealf (float _Complex);
|
extern double creal (double _Complex);
|
extern double creal (double _Complex);
|
extern long double creall (long double _Complex);
|
extern long double creall (long double _Complex);
|
|
|
extern float cimagf (float _Complex);
|
extern float cimagf (float _Complex);
|
extern double cimag (double _Complex);
|
extern double cimag (double _Complex);
|
extern long double cimagl (long double _Complex);
|
extern long double cimagl (long double _Complex);
|
|
|
float _Complex fc;
|
float _Complex fc;
|
double _Complex dc;
|
double _Complex dc;
|
long double _Complex ldc;
|
long double _Complex ldc;
|
|
|
void
|
void
|
foo (void)
|
foo (void)
|
{
|
{
|
crealf (fc) = 0; /* { dg-error "lvalue" "crealf not lvalue" } */
|
crealf (fc) = 0; /* { dg-error "lvalue" "crealf not lvalue" } */
|
cimagf (fc) = 0; /* { dg-error "lvalue" "cimagf not lvalue" } */
|
cimagf (fc) = 0; /* { dg-error "lvalue" "cimagf not lvalue" } */
|
creal (dc) = 0; /* { dg-error "lvalue" "creal not lvalue" } */
|
creal (dc) = 0; /* { dg-error "lvalue" "creal not lvalue" } */
|
cimag (dc) = 0; /* { dg-error "lvalue" "cimag not lvalue" } */
|
cimag (dc) = 0; /* { dg-error "lvalue" "cimag not lvalue" } */
|
creall (ldc) = 0; /* { dg-error "lvalue" "creall not lvalue" } */
|
creall (ldc) = 0; /* { dg-error "lvalue" "creall not lvalue" } */
|
cimagl (ldc) = 0; /* { dg-error "lvalue" "cimagl not lvalue" } */
|
cimagl (ldc) = 0; /* { dg-error "lvalue" "cimagl not lvalue" } */
|
}
|
}
|
|
|
