diff options
Diffstat (limited to 'bignum.c')
-rw-r--r-- | bignum.c | 7 |
1 files changed, 5 insertions, 2 deletions
@@ -350,14 +350,17 @@ big2int(x) UINT len = RBIGNUM(x)->len; USHORT *ds; - if (len > sizeof(long)/sizeof(USHORT)) - ArgError("Bignum too big to convert into fixnum"); + if (len > sizeof(INT)/sizeof(USHORT)) + ArgError("bignum too big to convert into `int'"); ds = BDIGITS(x); num = 0; while (len--) { num = BIGUP(num); num += ds[len]; } + if ((INT)num < 0) { + ArgError("bignum too big to convert into `int'"); + } if (!RBIGNUM(x)->sign) return -num; return num; } |