diff --git a/ChangeLog b/ChangeLog
index cd13554066..a636fe57cc 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Wed Apr  9 15:49:30 2003  Yukihiro Matsumoto  <matz@ruby-lang.org>
+
+	* bignum.c (bigdivmod): small typo.
+
 Wed Apr  9 15:35:04 2003  NAKAMURA Usaku <usa@ruby-lang.org>
 
 	* ext/readline/readline.c: include <unistd.h> only when
diff --git a/bignum.c b/bignum.c
index 0ae88ab713..9a0fc0efa8 100644
--- a/bignum.c
+++ b/bignum.c
@@ -1250,7 +1250,7 @@ bigdivmod(x, y, divp, modp)
     VALUE mod;
 
     bigdivrem(x, y, divp, &mod);
-    if (RBIGNUM(x)->sign != RBIGNUM(y)->sign && !BIGZEROP(x)) {
+    if (RBIGNUM(x)->sign != RBIGNUM(y)->sign && !BIGZEROP(mod)) {
 	if (divp) *divp = bigadd(*divp, rb_int2big(1), 0);
 	if (modp) *modp = bigadd(mod, y, 1);
     }