1 files changed, 31 insertions, 0 deletions
diff --git a/test/-ext-/rational/test_rat.rb b/test/-ext-/rational/test_rat.rb
new file mode 100644
index 0000000000..ef7e7fe535
--- /dev/null
+++ b/test/-ext-/rational/test_rat.rb
@@ -0,0 +1,31 @@
+require 'test/unit'
+require "-test-/rational"
+
+class TestRational < Test::Unit::TestCase
+  class TestGCD < Test::Unit::TestCase
+
+    def test_gcd_normal
+      x = 2*2*3*3*3
+      y = 2*2*2*3*3
+      gcd = 2*2*3*3
+      assert_equal(gcd, x.gcd_normal(y))
+    end
+
+    def test_gcd_gmp
+      x = 2*2*3*3*3
+      y = 2*2*2*3*3
+      gcd = 2*2*3*3
+      assert_equal(gcd, x.gcd_gmp(y))
+    rescue NotImplementedError
+    end
+
+    def test_gcd_gmp_brute_force
+      -13.upto(13) {|x|
+        -13.upto(13) {|y|
+          assert_equal(x.gcd_normal(y), x.gcd_gmp(y))
+        }
+      }
+    rescue NotImplementedError
+    end
+  end
+end