Index: fusl/src/math/floorl.c |
diff --git a/fusl/src/math/floorl.c b/fusl/src/math/floorl.c |
index 16aaec48eea8e4e28e747122d6179d95e279981f..9a7703c7db19bbc2baded7bb75efca50a1e267f0 100644 |
--- a/fusl/src/math/floorl.c |
+++ b/fusl/src/math/floorl.c |
@@ -1,34 +1,32 @@ |
#include "libm.h" |
#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024 |
-long double floorl(long double x) |
-{ |
- return floor(x); |
+long double floorl(long double x) { |
+ return floor(x); |
} |
#elif (LDBL_MANT_DIG == 64 || LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384 |
-static const long double toint = 1/LDBL_EPSILON; |
+static const long double toint = 1 / LDBL_EPSILON; |
-long double floorl(long double x) |
-{ |
- union ldshape u = {x}; |
- int e = u.i.se & 0x7fff; |
- long double y; |
+long double floorl(long double x) { |
+ union ldshape u = {x}; |
+ int e = u.i.se & 0x7fff; |
+ long double y; |
- if (e >= 0x3fff+LDBL_MANT_DIG-1 || x == 0) |
- return x; |
- /* y = int(x) - x, where int(x) is an integer neighbor of x */ |
- if (u.i.se >> 15) |
- y = x - toint + toint - x; |
- else |
- y = x + toint - toint - x; |
- /* special case because of non-nearest rounding modes */ |
- if (e <= 0x3fff-1) { |
- FORCE_EVAL(y); |
- return u.i.se >> 15 ? -1 : 0; |
- } |
- if (y > 0) |
- return x + y - 1; |
- return x + y; |
+ if (e >= 0x3fff + LDBL_MANT_DIG - 1 || x == 0) |
+ return x; |
+ /* y = int(x) - x, where int(x) is an integer neighbor of x */ |
+ if (u.i.se >> 15) |
+ y = x - toint + toint - x; |
+ else |
+ y = x + toint - toint - x; |
+ /* special case because of non-nearest rounding modes */ |
+ if (e <= 0x3fff - 1) { |
+ FORCE_EVAL(y); |
+ return u.i.se >> 15 ? -1 : 0; |
+ } |
+ if (y > 0) |
+ return x + y - 1; |
+ return x + y; |
} |
#endif |