summaryrefslogtreecommitdiff
path: root/numeric.c
diff options
context:
space:
mode:
Diffstat (limited to 'numeric.c')
-rw-r--r--numeric.c15
1 files changed, 11 insertions, 4 deletions
diff --git a/numeric.c b/numeric.c
index a62f53f748..87d7e986a4 100644
--- a/numeric.c
+++ b/numeric.c
@@ -479,6 +479,16 @@ flo_hash(num)
return INT2FIX(hash);
}
+VALUE
+rb_dbl_cmp(a, b)
+ double a, b;
+{
+ if (a == b) return INT2FIX(0);
+ if (a > b) return INT2FIX(1);
+ if (a < b) return INT2FIX(-1);
+ rb_raise(rb_eFloatDomainError, "comparing NaN");
+}
+
static VALUE
flo_cmp(x, y)
VALUE x, y;
@@ -502,10 +512,7 @@ flo_cmp(x, y)
default:
return rb_num_coerce_bin(x, y);
}
- if (a == b) return INT2FIX(0);
- if (a > b) return INT2FIX(1);
- if (a < b) return INT2FIX(-1);
- rb_raise(rb_eFloatDomainError, "comparing NaN");
+ return rb_dbl_cmp(a, b);
}
static VALUE