projects
/
musl
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
update case mappings to unicode 12.1.0
[musl]
/
src
/
math
/
rint.c
diff --git
a/src/math/rint.c
b/src/math/rint.c
index
81f4e62
..
fbba390
100644
(file)
--- a/
src/math/rint.c
+++ b/
src/math/rint.c
@@
-1,6
+1,14
@@
+#include <float.h>
#include <math.h>
#include <stdint.h>
#include <math.h>
#include <stdint.h>
+#if FLT_EVAL_METHOD==0 || FLT_EVAL_METHOD==1
+#define EPS DBL_EPSILON
+#elif FLT_EVAL_METHOD==2
+#define EPS LDBL_EPSILON
+#endif
+static const double_t toint = 1/EPS;
+
double rint(double x)
{
union {double f; uint64_t i;} u = {x};
double rint(double x)
{
union {double f; uint64_t i;} u = {x};
@@
-11,9
+19,9
@@
double rint(double x)
if (e >= 0x3ff+52)
return x;
if (s)
if (e >= 0x3ff+52)
return x;
if (s)
- y =
(double)(x - 0x1p52) + 0x1p52
;
+ y =
x - toint + toint
;
else
else
- y =
(double)(x + 0x1p52) - 0x1p52
;
+ y =
x + toint - toint
;
if (y == 0)
return s ? -0.0 : 0;
return y;
if (y == 0)
return s ? -0.0 : 0;
return y;