diff --git a/ChangeLog b/ChangeLog
index 4c7b0482e3..9541afbc79 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Mon Oct  7 16:43:07 2002  Yukihiro Matsumoto  <matz@ruby-lang.org>
+
+	* bignum.c (bigdivrem): bignum zero's len should not be 0.
+
 Mon Oct  7 15:36:42 2002  Yukihiro Matsumoto  <matz@ruby-lang.org>
 
 	* bignum.c (bigdivmod): wrong condition check for Bignum zero.
diff --git a/bignum.c b/bignum.c
index 1e08346189..a68e6ad59d 100644
--- a/bignum.c
+++ b/bignum.c
@@ -928,7 +928,7 @@ bigdivrem(x, y, divp, modp)
     if (modp) {			/* just normalize remainder */
 	*modp = rb_big_clone(z);
 	zds = BDIGITS(*modp);
-	while (ny-- && !zds[ny]); ++ny;
+	while (--ny && !zds[ny]); ++ny;
 	if (dd) {
 	    t2 = 0; i = ny;
 	    while(i--) {