diff --git a/ChangeLog b/ChangeLog
index b3fee158b4..d9a7142282 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Thu Jun 18 20:32:11 2009  Tadayoshi Funaba  <tadf@dotrb.org>
+
+	* numeric.c ( num_numerator, num_denominator): use
+	  to_r [ruby-core:23910].
+
 Thu Jun 18 16:21:05 2009  Ryan Davis  <ryand-ruby@zenspider.com>
 
 	* lib/minitest/*.rb: Imported minitest 1.4.0 r5083.
diff --git a/numeric.c b/numeric.c
index 74061fc690..a5014743a8 100644
--- a/numeric.c
+++ b/numeric.c
@@ -1792,13 +1792,15 @@ rb_num2ull(VALUE val)
 static VALUE
 num_numerator(VALUE num)
 {
-    return rb_funcall(rb_Rational1(num), rb_intern("numerator"), 0);
+    return rb_funcall(rb_funcall(num, rb_intern("to_r"), 0),
+		      rb_intern("numerator"), 0);
 }
 
 static VALUE
 num_denominator(VALUE num)
 {
-    return rb_funcall(rb_Rational1(num), rb_intern("denominator"), 0);
+    return rb_funcall(rb_funcall(num, rb_intern("to_r"), 0),
+		      rb_intern("denominator"), 0);
 }
 
 /*