summaryrefslogtreecommitdiff
path: root/object.c
diff options
context:
space:
mode:
Diffstat (limited to 'object.c')
-rw-r--r--object.c15
1 files changed, 12 insertions, 3 deletions
diff --git a/object.c b/object.c
index 7d6e479..6a66159 100644
--- a/object.c
+++ b/object.c
@@ -3421,9 +3421,18 @@ rb_str_to_dbl(VALUE str, int badcheck)
#define big2dbl_without_to_f(x) rb_big2dbl(x)
#define int2dbl_without_to_f(x) \
(FIXNUM_P(x) ? fix2dbl_without_to_f(x) : big2dbl_without_to_f(x))
-#define rat2dbl_without_to_f(x) \
- (int2dbl_without_to_f(rb_rational_num(x)) / \
- int2dbl_without_to_f(rb_rational_den(x)))
+static inline double
+rat2dbl_without_to_f(VALUE x)
+{
+ VALUE num = rb_rational_num(x);
+ VALUE den = rb_rational_den(x);
+ if (RB_INTEGER_TYPE_P(num) && RB_INTEGER_TYPE_P(den)) {
+ return int2dbl_without_to_f(num) / int2dbl_without_to_f(den);
+ }
+ else {
+ return NUM2DBL(num) / NUM2DBL(den);
+ }
+}
#define special_const_to_float(val, pre, post) \
switch (val) { \