musl-tcc/src/math/nearbyintf.c

19 lines
250 B
C

#include <fenv.h>
#include <math.h>
float nearbyintf(float x)
{
#ifdef FE_INEXACT
#pragma STDC FENV_ACCESS ON
int e;
e = fetestexcept(FE_INEXACT);
#endif
x = rintf(x);
#ifdef FE_INEXACT
if (!e)
feclearexcept(FE_INEXACT);
#endif
return x;
}