summaryrefslogtreecommitdiff
path: root/numeric.c
diff options
context:
space:
mode:
Diffstat (limited to 'numeric.c')
-rw-r--r--numeric.c26
1 files changed, 14 insertions, 12 deletions
diff --git a/numeric.c b/numeric.c
index f485987467..a62f53f748 100644
--- a/numeric.c
+++ b/numeric.c
@@ -1464,24 +1464,26 @@ fix_aref(fix, idx)
VALUE fix, idx;
{
long val = FIX2LONG(fix);
+ long i;
if (TYPE(idx) == T_BIGNUM) {
- if (!RBIGNUM(idx)->sign || val >= 0)
- return INT2FIX(0);
- return INT2FIX(1);
+ idx = rb_big_norm(idx);
+ if (!FIXNUM_P(idx)) {
+ if (!RBIGNUM(idx)->sign || val >= 0)
+ return INT2FIX(0);
+ return INT2FIX(1);
+ }
}
- else {
- int i = NUM2INT(idx);
+ i = NUM2LONG(idx);
- if (i < 0) return INT2FIX(0);
- if (sizeof(VALUE)*CHAR_BIT-1 < i) {
- if (val < 0) return INT2FIX(1);
- return INT2FIX(0);
- }
- if (val & (1L<<i))
- return INT2FIX(1);
+ if (i < 0) return INT2FIX(0);
+ if (sizeof(VALUE)*CHAR_BIT-1 < i) {
+ if (val < 0) return INT2FIX(1);
return INT2FIX(0);
}
+ if (val & (1L<<i))
+ return INT2FIX(1);
+ return INT2FIX(0);
}
static VALUE