2 files changed, 6 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index d072d74c57..4cc6e75a28 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Wed Jun 19 07:18:47 2013  Tanaka Akira  <akr@fsij.org>
+
+	* bignum.c (rb_big_aref): Apply BIGLO to ~xds[i] for environment which
+	  BDIGIT is 16bit.
+
 Wed Jun 19 07:09:26 2013  Koichi Sasada  <ko1@atdot.net>
 
 	* gc.c (rgengc_remember): fix output level.
diff --git a/bignum.c b/bignum.c
index ec1a864a9a..f831fb44e2 100644
--- a/bignum.c
+++ b/bignum.c
@@ -4877,7 +4877,7 @@ rb_big_aref(VALUE x, VALUE y)
     if (!RBIGNUM_SIGN(x)) {
 	xds = BDIGITS(x);
 	i = 0; num = 1;
-	while (num += ~xds[i], ++i <= s1) {
+	while (num += BIGLO(~xds[i]), ++i <= s1) {
 	    num = BIGDN(num);
 	}
     }