diff --git a/ChangeLog b/ChangeLog
index 34b23d48b9..6e6b5effa0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Wed Jul 12 15:32:57 2000  Yukihiro Matsumoto  <matz@netlab.co.jp>
+
+	* bignum.c (bigdivrem): small embarrassing typo.
+
 Wed Jul 12 15:06:28 2000  Yukihiro Matsumoto  <matz@netlab.co.jp>
 
 	* eval.c (rb_eval): use rb_const_get_at().
diff --git a/bignum.c b/bignum.c
index 5168ef1728..1861b85d58 100644
--- a/bignum.c
+++ b/bignum.c
@@ -868,10 +868,10 @@ bigdivrem(x, y, divp, modp)
     } while (--j >= ny);
     if (divp) {			/* move quotient down in z */
 	*divp = rb_big_clone(z);
-	zds = BDIGITS(*div);
+	zds = BDIGITS(*divp);
 	j = (nx==ny ? nx+2 : nx+1) - ny;
 	for (i = 0;i < j;i++) zds[i] = zds[i+ny];
-	RBIGNUM(*div)->len = i;
+	RBIGNUM(*divp)->len = i;
     }
     if (modp) {			/* just normalize remainder */
 	*modp = rb_big_clone(z);