2 files changed, 8 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index a2740a6e9d..b3904e1940 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Wed Jul  8 23:13:54 2009  Tadayoshi Funaba  <tadf@dotrb.org>
+
+	* complex.c (nucomp_div): omitted zero division check.
+
 Wed Jul  8 21:00:37 2009  Keiju Ishitsuka  <keiju@emperor2.pendome>
 
 	* lib/irb/inspector.rb: forget svn add.
diff --git a/complex.c b/complex.c
index 3ccc50974c..9d9e90c02e 100644
--- a/complex.c
+++ b/complex.c
@@ -758,8 +758,10 @@ f_divide(VALUE self, VALUE other,
 static VALUE
 nucomp_div(VALUE self, VALUE other)
 {
-    if (f_zero_p(other))
+#if 0 /* too much cost */
+    if (f_zero_p(other) && k_exact_p(self) && k_exact_p(other))
 	rb_raise_zerodiv();
+#endif
     return f_divide(self, other, f_quo, id_quo);
 }
 
@@ -824,7 +826,7 @@ rb_fexpt(VALUE x, VALUE y)
 static VALUE
 nucomp_expt(VALUE self, VALUE other)
 {
-    if (k_exact_p(other) && f_zero_p(other))
+    if (f_zero_p(other) && k_exact_p(other))
 	return f_complex_new_bang1(CLASS_OF(self), ONE);
 
     if (k_rational_p(other) && f_one_p(f_denominator(other)))