summaryrefslogtreecommitdiffstats
path: root/numeric.c
diff options
context:
space:
mode:
Diffstat (limited to 'numeric.c')
-rw-r--r--numeric.c12
1 files changed, 11 insertions, 1 deletions
diff --git a/numeric.c b/numeric.c
index d9466daa9..ddd30e46a 100644
--- a/numeric.c
+++ b/numeric.c
@@ -644,7 +644,10 @@ flodivmod(double x, double y, double *divp, double *modp)
mod = x - z * y;
}
#endif
- div = (x - mod) / y;
+ if (isinf(x) && !isinf(y) && !isnan(y))
+ div = x;
+ else
+ div = (x - mod) / y;
if (y*mod < 0) {
mod += y;
div -= 1.0;
@@ -715,9 +718,16 @@ flo_divmod(VALUE x, VALUE y)
}
flodivmod(RFLOAT(x)->value, fy, &div, &mod);
if (FIXABLE(div)) {
+#ifdef HVAE_ROUND
val = round(div);
+#else
+ val = (div < 0) ? ceil(x - 0.5) : floor(x + 0.5);
+#endif
a = LONG2FIX(val);
}
+ else if (isnan(div) || isinf(div)) {
+ a = rb_float_new(div);
+ }
else {
a = rb_dbl2big(div);
}