* bignum.c (biglsh_bang): Fix bignum digits under-run.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@41839 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 2 insertions, 2 deletions

diff --git a/bignum.c b/bignum.c
index 6e2758bae6..c93061d44f 100644
--- a/bignum.c
+++ b/bignum.c
@@ -4425,11 +4425,11 @@ biglsh_bang(BDIGIT *xds, long xn, unsigned long shift)
     zds = xds + xn - 1;
     xn -= s1 + 1;
     num = BIGLO(xds[xn]<<s2);
-    do {
+    while (0 < xn) {
 	*zds-- = num | xds[--xn]>>s3;
 	num = BIGLO(xds[xn]<<s2);
     }
-    while (xn > 0);
+    assert(xds <= zds);
     *zds = num;
     for (i = s1; i > 0; --i)
 	*zds-- = 0;