cdhash_cmp: rational literals with fractions

Nobu kindly pointed out that rational literals can have fractions.

1 files changed, 3 insertions, 2 deletions

diff --git a/compile.c b/compile.c
index 9001fd14ff..341361dc78 100644
--- a/compile.c
+++ b/compile.c
@@ -2006,8 +2006,9 @@ cdhash_cmp(VALUE val, VALUE lit)
         return rb_float_cmp(lit, val);
     }
     else if (tlit ==  T_RATIONAL) {
-        /* Rational literals don't have fractions. */
-        return cdhash_cmp(val, rb_rational_num(lit));
+        const struct RRational *dat1 = RRATIONAL(val);
+        const struct RRational *dat2 = RRATIONAL(lit);
+        return (dat1->num == dat2->num) && (dat1->den == dat2->den);
     }
     else {
         UNREACHABLE_RETURN(-1);