diff options
Diffstat (limited to 'numeric.c')
-rw-r--r-- | numeric.c | 25 |
1 files changed, 13 insertions, 12 deletions
@@ -1600,20 +1600,21 @@ check_int(num) } static void -check_uint(num) +check_uint(num, sign) unsigned long num; + VALUE sign; { static const unsigned long mask = ~(unsigned long)UINT_MAX; - static const unsigned long msb = ~LONG_MAX; - const char *s; - if ((num & mask) != 0 && - ((num & mask) != mask || (num & ~mask) <= INT_MAX + 1UL)) { - if ((num & msb) == 0) - s = "big"; - else - s = "small"; - rb_raise(rb_eRangeError, "integer %ld too %s to convert to `unsigned int'", num, s); + if (RTEST(sign)) { + /* minus */ + if ((num & mask) != mask || (num & ~mask) <= INT_MAX + 1UL) + rb_raise(rb_eRangeError, "integer %ld too small to convert to `unsigned int'", num); + } + else { + /* plus */ + if ((num & mask) != 0) + rb_raise(rb_eRangeError, "integer %lu too big to convert to `unsigned int'", num); } } @@ -1643,7 +1644,7 @@ rb_num2uint(val) { unsigned long num = rb_num2ulong(val); - check_uint(num); + check_uint(num, rb_funcall(val, '<', 1, INT2FIX(0))); return num; } @@ -1658,7 +1659,7 @@ rb_fix2uint(val) } num = FIX2ULONG(val); - check_uint(num); + check_uint(num, rb_funcall(val, '<', 1, INT2FIX(0))); return num; } #else |