blob: bc24add160576f1e925404593c76fee545047638 [file] [log] [blame]
/**
* This file has no copyright assigned and is placed in the Public Domain.
* This file is part of the w64 mingw-runtime package.
* No warranty is given; refer to the file DISCLAIMER.PD within this package.
*/
#include <math.h>
double
round (double x)
{
double res;
if (x >= 0.0)
{
res = ceil (x);
if (res - x > 0.5)
res -= 1.0;
}
else
{
res = ceil (-x);
if (res + x > 0.5)
res -= 1.0;
res = -res;
}
return res;
}