From 0aff83dcdc872c05683a6bea06ea00678b2fde52 Mon Sep 17 00:00:00 2001
From: "Yukihiro \"Matz\" Matsumoto" <matz@ruby.or.jp>
Date: Thu, 25 Mar 2021 08:28:41 +0900
Subject: rational.c: inline `mrb_rational_eq()`.

It removes non-static function, so that strictly saying, it's
an incompatible change. But the function was added recently and I am
sure no one uses it yet.
---
 mrbgems/mruby-rational/src/rational.c | 37 ++++++++++++++++++-----------------
 1 file changed, 19 insertions(+), 18 deletions(-)

diff --git a/mrbgems/mruby-rational/src/rational.c b/mrbgems/mruby-rational/src/rational.c
index 5b6bbad89..6cd9dc4f5 100644
--- a/mrbgems/mruby-rational/src/rational.c
+++ b/mrbgems/mruby-rational/src/rational.c
@@ -354,18 +354,22 @@ rational_m(mrb_state *mrb, mrb_value self)
 #endif
 }
 
-mrb_bool
-mrb_rational_eq(mrb_state *mrb, mrb_value x, mrb_value y)
+static mrb_value
+rational_eq(mrb_state *mrb, mrb_value x)
 {
+  mrb_value y = mrb_get_arg1(mrb);
   struct mrb_rational *p1 = rational_ptr(mrb, x);
+  mrb_bool result;
 
   switch (mrb_type(y)) {
   case MRB_TT_INTEGER:
-    if (p1->denominator != 1) return FALSE;
-    return p1->numerator == mrb_integer(y);
+    if (p1->denominator != 1) return mrb_false_value();
+    result = p1->numerator == mrb_integer(y);
+    break;
 #ifndef MRB_NO_FLOAT
   case MRB_TT_FLOAT:
-    return ((double)p1->numerator/p1->denominator) == mrb_float(y);
+    result = ((double)p1->numerator/p1->denominator) == mrb_float(y);
+    break;
 #endif
   case MRB_TT_RATIONAL:
     {
@@ -373,39 +377,36 @@ mrb_rational_eq(mrb_state *mrb, mrb_value x, mrb_value y)
       mrb_int a, b;
 
       if (p1->numerator == p2->numerator && p1->denominator == p2->denominator) {
-        return TRUE;
+        return mrb_true_value();
       }
       if (mrb_int_mul_overflow(p1->numerator, p2->denominator, &a) ||
           mrb_int_mul_overflow(p2->numerator, p1->denominator, &b)) {
 #ifdef MRB_NO_FLOAT
         rat_overflow(mrb);
 #else
-        return (double)p1->numerator*p2->denominator == (double)p2->numerator*p2->denominator;
+        result = (double)p1->numerator*p2->denominator == (double)p2->numerator*p2->denominator;
+        break;
 #endif
       }
-      return a == b;
+      result = a == b;
+      break;
     }
 
 #ifdef MRB_USE_COMPLEX
   case MRB_TT_COMPLEX:
    {
       mrb_bool mrb_complex_eq(mrb_state *mrb, mrb_value, mrb_value);
-      return mrb_complex_eq(mrb, y, x);
+      result = mrb_complex_eq(mrb, y, x);
+      break;
     }
 #endif
   default:
-    return mrb_equal(mrb, y, x);
+    result = mrb_equal(mrb, y, x);
+    break;
   }
+  return mrb_bool_value(result);
 }
 
-static mrb_value
-rational_eq(mrb_state *mrb, mrb_value x)
-{
-  mrb_value y = mrb_get_arg1(mrb);
-  return mrb_bool_value(mrb_rational_eq(mrb, x, y));
-}
-
-
 #ifndef MRB_NO_FLOAT
 mrb_value mrb_complex_new(mrb_state *, mrb_float, mrb_float);
 #endif
-- 
cgit v1.2.3