summaryrefslogtreecommitdiff
path: root/bignum.c
diff options
context:
space:
mode:
authormatz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2006-10-07 15:49:00 +0000
committermatz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2006-10-07 15:49:00 +0000
commit3b4d19278f1dbf8df1c06b2aa9bd2774a3811ee3 (patch)
treeca1029b5126291ed2d7e229b83c3e5bb047cf999 /bignum.c
parent2d7b6f2f5be4a302898477957620a04c6153e3ac (diff)
* bignum.c (rb_big_rshift): a bug in right shift of negative
bignums. [ruby-core:09020] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@11104 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'bignum.c')
-rw-r--r--bignum.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/bignum.c b/bignum.c
index b5d405b..bc535fd 100644
--- a/bignum.c
+++ b/bignum.c
@@ -1885,6 +1885,10 @@ rb_big_rshift(x, y)
}
xds = BDIGITS(x);
i = RBIGNUM(x)->len; j = i - s1;
+ if (j == 0) {
+ if (RBIGNUM(x)->sign) return INT2FIX(0);
+ else return INT2FIX(-1);
+ }
z = bignew(j, RBIGNUM(x)->sign);
if (!RBIGNUM(x)->sign) {
num = ((BDIGIT_DBL)~0) << BITSPERDIG;