Subversion Repositories openrisc_2011-10-31

/* Test for diagnostics for Wconversion for floating-point.  */

/* { dg-do compile } */

/* { dg-skip-if "doubles are floats" { "avr-*-*" } { "*" } { "" } } */

/* { dg-options "-std=c99 -Wconversion" { target c } } */

/* { dg-options "-Wconversion" { target c++ } } */

/* { dg-require-effective-target large_double } */

float  vfloat;

double vdouble;

long double vlongdouble;

void ffloat (float f);

void fdouble (double d);

void flongdouble (long double ld);

void h (void)

{

  float f = 0;

  double d = 0;

  long double ld = 0;

  ffloat (3.1); /* { dg-warning "conversion" } */

  vfloat = 3.1; /* { dg-warning "conversion" } */

  ffloat (3.1L); /* { dg-warning "conversion" } */

  vfloat = 3.1L;  /* { dg-warning "conversion" } */

  fdouble (3.1L); /* { dg-warning "conversion" "" { target large_long_double } } */

  vdouble = 3.1L; /* { dg-warning "conversion" "" { target large_long_double } } */

  ffloat (vdouble); /* { dg-warning "conversion" } */

  vfloat = vdouble; /* { dg-warning "conversion" } */

  ffloat (vlongdouble); /* { dg-warning "conversion" } */

  vfloat = vlongdouble; /* { dg-warning "conversion" } */

  fdouble (vlongdouble); /* { dg-warning "conversion" "" { target large_long_double } } */

  vdouble = vlongdouble; /* { dg-warning "conversion" "" { target large_long_double } } */

  ffloat ((float) 3.1);

  vfloat = (float) 3.1;

  ffloat ((float) 3.1L);

  vfloat = (float) 3.1L;

  fdouble ((double) 3.1L);

  vdouble = (double) 3.1L;

  ffloat ((float) vdouble);

  vfloat = (float) vdouble;

  ffloat ((float) vlongdouble);

  vfloat = (float) vlongdouble;

  fdouble ((double) vlongdouble);

  vdouble = (double) vlongdouble;

  ffloat (3.0);

  vfloat = 3.0;

  ffloat (3.1f);

  vfloat = 3.1f;

  ffloat (0.25L);

  vfloat = 0.25L;

  fdouble (3.0);

  vdouble = 3.0;

  fdouble (3.1f);

  vdouble = 3.1f;

  fdouble (0.25L);

  vdouble = 0.25L;

  flongdouble (3.0);

  vlongdouble = 3.0;

  flongdouble (3.1f);

  vlongdouble = 3.1f;

  flongdouble (0.25L);

  vlongdouble = 0.25L;

  ffloat (f);

  vfloat = f;

  fdouble (f);

  vdouble = f;

  fdouble (d);

  vdouble = d;

  flongdouble (f);

  vlongdouble = f;

  flongdouble (d);

  vlongdouble = d;

  flongdouble (ld);

  vlongdouble = ld;

}