/* { dg-do compile } */
/* { dg-options "-O1" } */
extern double floor (double);
long foo (float f)
{
return (long) floor (f);
}