diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/numeric.c | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/src/numeric.c b/src/numeric.c index 828898fcc..aa6f86cb9 100644 --- a/src/numeric.c +++ b/src/numeric.c @@ -610,6 +610,17 @@ flo_round(mrb_state *mrb, mrb_value num) return mrb_fixnum_value((mrb_int)number); } +void +mrb_check_num_exact(mrb_state *mrb, mrb_float num) +{ + if (isinf(num)) { + mrb_raise(mrb, E_FLOATDOMAIN_ERROR, num < 0 ? "-Infinity" : "Infinity"); + } + if (isnan(num)) { + mrb_raise(mrb, E_FLOATDOMAIN_ERROR, "NaN"); + } +} + /* 15.2.9.3.14 */ /* 15.2.9.3.15 */ /* @@ -630,6 +641,7 @@ flo_truncate(mrb_state *mrb, mrb_value num) if (f < 0.0) f = ceil(f); if (!FIXABLE(f)) { + mrb_check_num_exact(mrb, f); return mrb_float_value(mrb, f); } return mrb_fixnum_value((mrb_int)f); |