Subversion Repositories openrisc

/* Test __builtin_complex errors.  */

/* { dg-do compile } */

/* { dg-options "-std=c1x -pedantic-errors" } */

typedef double D;

double d;

_Complex double dc = __builtin_complex (1.0, (D) 0.0);

_Complex double dc2 = __builtin_complex (d, 0.0); /* { dg-error "not constant" } */

_Complex float fc = __builtin_complex (1.0f, 1); /* { dg-error "not of real binary floating-point type" } */

_Complex float fc2 = __builtin_complex (1, 1.0f); /* { dg-error "not of real binary floating-point type" } */

_Complex float fc3 = __builtin_complex (1.0f, 1.0); /* { dg-error "different types" } */

void

f (void)

{

  __builtin_complex (0.0); /* { dg-error "wrong number of arguments" } */

  __builtin_complex (0.0, 0.0, 0.0); /* { dg-error "wrong number of arguments" } */

}

void (*p) (void) = __builtin_complex; /* { dg-error "cannot take address" } */