RBIGNUM 1038 array.c if (RBIGNUM(cmp)->sign) return 1;
RBIGNUM 24 bignum.c #define BDIGITS(x) ((BDIGIT*)RBIGNUM(x)->digits)
RBIGNUM 56 bignum.c VALUE z = bignew_1(CLASS_OF(x), RBIGNUM(x)->len, RBIGNUM(x)->sign);
RBIGNUM 56 bignum.c VALUE z = bignew_1(CLASS_OF(x), RBIGNUM(x)->len, RBIGNUM(x)->sign);
RBIGNUM 58 bignum.c MEMCPY(BDIGITS(z), BDIGITS(x), BDIGIT, RBIGNUM(x)->len);
RBIGNUM 67 bignum.c long i = RBIGNUM(x)->len;
RBIGNUM 77 bignum.c } while (i < RBIGNUM(x)->len);
RBIGNUM 79 bignum.c if ((ds[RBIGNUM(x)->len-1] & (1<<(BITSPERDIG-1))) == 0) {
RBIGNUM 80 bignum.c REALLOC_N(RBIGNUM(x)->digits, BDIGIT, ++RBIGNUM(x)->len);
RBIGNUM 80 bignum.c REALLOC_N(RBIGNUM(x)->digits, BDIGIT, ++RBIGNUM(x)->len);
RBIGNUM 82 bignum.c ds[RBIGNUM(x)->len-1] = ~0;
RBIGNUM 98 bignum.c long len = RBIGNUM(x)->len;
RBIGNUM 102 bignum.c RBIGNUM(x)->len = ++len;
RBIGNUM 110 bignum.c if (RBIGNUM(x)->sign) {
RBIGNUM 145 bignum.c RBIGNUM(big)->len = i+1;
RBIGNUM 162 bignum.c RBIGNUM(big)->sign = 0;
RBIGNUM 199 bignum.c long len = RBIGNUM(val)->len;
RBIGNUM 245 bignum.c RBIGNUM(big)->len = i+1;
RBIGNUM 248 bignum.c RBIGNUM(big)->sign = 0;
RBIGNUM 269 bignum.c len = RBIGNUM(val)->len * SIZEOF_BDIGITS;
RBIGNUM 272 bignum.c if (!RBIGNUM(val)->sign) {
RBIGNUM 295 bignum.c RBIGNUM(big)->sign = 0;
RBIGNUM 420 bignum.c RBIGNUM(big)->sign = sign;
RBIGNUM 538 bignum.c RBIGNUM(big)->len = i+1;
RBIGNUM 555 bignum.c RBIGNUM(big)->sign = 0;
RBIGNUM 609 bignum.c i = RBIGNUM(x)->len;
RBIGNUM 638 bignum.c s[0] = RBIGNUM(x)->sign ? '+' : '-';
RBIGNUM 658 bignum.c RSTRING(ss)->len -= RBIGNUM(x)->sign?j:j-1;
RBIGNUM 659 bignum.c memmove(RBIGNUM(x)->sign?s:s+1, s+j, RSTRING(ss)->len);
RBIGNUM 685 bignum.c long len = RBIGNUM(x)->len;
RBIGNUM 706 bignum.c if (!RBIGNUM(x)->sign) return -num;
RBIGNUM 716 bignum.c if ((long)num < 0 && (RBIGNUM(x)->sign || (long)num != LONG_MIN)) {
RBIGNUM 719 bignum.c if (!RBIGNUM(x)->sign) return -(long)num;
RBIGNUM 730 bignum.c long len = RBIGNUM(x)->len;
RBIGNUM 751 bignum.c if (!RBIGNUM(x)->sign) return -num;
RBIGNUM 761 bignum.c if ((LONG_LONG)num < 0 && (RBIGNUM(x)->sign
RBIGNUM 765 bignum.c if (!RBIGNUM(x)->sign) return -(LONG_LONG)num;
RBIGNUM 816 bignum.c long i = RBIGNUM(x)->len;
RBIGNUM 823 bignum.c if (!RBIGNUM(x)->sign) d = -d;
RBIGNUM 838 bignum.c long xlen = RBIGNUM(x)->len;
RBIGNUM 855 bignum.c if (RBIGNUM(x)->sign > RBIGNUM(y)->sign) return INT2FIX(1);
RBIGNUM 855 bignum.c if (RBIGNUM(x)->sign > RBIGNUM(y)->sign) return INT2FIX(1);
RBIGNUM 856 bignum.c if (RBIGNUM(x)->sign < RBIGNUM(y)->sign) return INT2FIX(-1);
RBIGNUM 856 bignum.c if (RBIGNUM(x)->sign < RBIGNUM(y)->sign) return INT2FIX(-1);
RBIGNUM 857 bignum.c if (xlen < RBIGNUM(y)->len)
RBIGNUM 858 bignum.c return (RBIGNUM(x)->sign) ? INT2FIX(-1) : INT2FIX(1);
RBIGNUM 859 bignum.c if (xlen > RBIGNUM(y)->len)
RBIGNUM 860 bignum.c return (RBIGNUM(x)->sign) ? INT2FIX(1) : INT2FIX(-1);
RBIGNUM 865 bignum.c (RBIGNUM(x)->sign ? INT2FIX(1) : INT2FIX(-1)) :
RBIGNUM 866 bignum.c (RBIGNUM(x)->sign ? INT2FIX(-1) : INT2FIX(1));
RBIGNUM 887 bignum.c if (RBIGNUM(x)->sign != RBIGNUM(y)->sign) return Qfalse;
RBIGNUM 887 bignum.c if (RBIGNUM(x)->sign != RBIGNUM(y)->sign) return Qfalse;
RBIGNUM 888 bignum.c if (RBIGNUM(x)->len != RBIGNUM(y)->len) return Qfalse;
RBIGNUM 888 bignum.c if (RBIGNUM(x)->len != RBIGNUM(y)->len) return Qfalse;
RBIGNUM 889 bignum.c if (MEMCMP(BDIGITS(x),BDIGITS(y),BDIGIT,RBIGNUM(y)->len) != 0) return Qfalse;
RBIGNUM 898 bignum.c if (RBIGNUM(x)->sign != RBIGNUM(y)->sign) return Qfalse;
RBIGNUM 898 bignum.c if (RBIGNUM(x)->sign != RBIGNUM(y)->sign) return Qfalse;
RBIGNUM 899 bignum.c if (RBIGNUM(x)->len != RBIGNUM(y)->len) return Qfalse;
RBIGNUM 899 bignum.c if (RBIGNUM(x)->len != RBIGNUM(y)->len) return Qfalse;
RBIGNUM 900 bignum.c if (MEMCMP(BDIGITS(x),BDIGITS(y),BDIGIT,RBIGNUM(y)->len) != 0) return Qfalse;
RBIGNUM 910 bignum.c RBIGNUM(z)->sign = !RBIGNUM(x)->sign;
RBIGNUM 910 bignum.c RBIGNUM(z)->sign = !RBIGNUM(x)->sign;
RBIGNUM 920 bignum.c long i = RBIGNUM(x)->len;
RBIGNUM 923 bignum.c if (!RBIGNUM(x)->sign) get2comp(z, Qtrue);
RBIGNUM 925 bignum.c if (RBIGNUM(x)->sign) get2comp(z, Qfalse);
RBIGNUM 926 bignum.c RBIGNUM(z)->sign = !RBIGNUM(z)->sign;
RBIGNUM 926 bignum.c RBIGNUM(z)->sign = !RBIGNUM(z)->sign;
RBIGNUM 938 bignum.c long i = RBIGNUM(x)->len;
RBIGNUM 941 bignum.c if (RBIGNUM(x)->len < RBIGNUM(y)->len) {
RBIGNUM 941 bignum.c if (RBIGNUM(x)->len < RBIGNUM(y)->len) {
RBIGNUM 944 bignum.c else if (RBIGNUM(x)->len == RBIGNUM(y)->len) {
RBIGNUM 944 bignum.c else if (RBIGNUM(x)->len == RBIGNUM(y)->len) {
RBIGNUM 957 bignum.c z = bignew(RBIGNUM(x)->len, (z == 0)?1:0);
RBIGNUM 960 bignum.c for (i = 0, num = 0; i < RBIGNUM(y)->len; i++) {
RBIGNUM 965 bignum.c while (num && i < RBIGNUM(x)->len) {
RBIGNUM 970 bignum.c while (i < RBIGNUM(x)->len) {
RBIGNUM 987 bignum.c sign = (sign == RBIGNUM(y)->sign);
RBIGNUM 988 bignum.c if (RBIGNUM(x)->sign != sign) {
RBIGNUM 993 bignum.c if (RBIGNUM(x)->len > RBIGNUM(y)->len) {
RBIGNUM 993 bignum.c if (RBIGNUM(x)->len > RBIGNUM(y)->len) {
RBIGNUM 994 bignum.c len = RBIGNUM(x)->len + 1;
RBIGNUM 998 bignum.c len = RBIGNUM(y)->len + 1;
RBIGNUM 1002 bignum.c len = RBIGNUM(x)->len;
RBIGNUM 1008 bignum.c len = RBIGNUM(y)->len;
RBIGNUM 1086 bignum.c j = RBIGNUM(x)->len + RBIGNUM(y)->len + 1;
RBIGNUM 1086 bignum.c j = RBIGNUM(x)->len + RBIGNUM(y)->len + 1;
RBIGNUM 1087 bignum.c z = bignew(j, RBIGNUM(x)->sign==RBIGNUM(y)->sign);
RBIGNUM 1087 bignum.c z = bignew(j, RBIGNUM(x)->sign==RBIGNUM(y)->sign);
RBIGNUM 1090 bignum.c for (i = 0; i < RBIGNUM(x)->len; i++) {
RBIGNUM 1094 bignum.c for (j = 0; j < RBIGNUM(y)->len; j++) {
RBIGNUM 1113 bignum.c long nx = RBIGNUM(x)->len, ny = RBIGNUM(y)->len;
RBIGNUM 1113 bignum.c long nx = RBIGNUM(x)->len, ny = RBIGNUM(y)->len;
RBIGNUM 1139 bignum.c RBIGNUM(z)->sign = RBIGNUM(x)->sign==RBIGNUM(y)->sign;
RBIGNUM 1139 bignum.c RBIGNUM(z)->sign = RBIGNUM(x)->sign==RBIGNUM(y)->sign;
RBIGNUM 1139 bignum.c RBIGNUM(z)->sign = RBIGNUM(x)->sign==RBIGNUM(y)->sign;
RBIGNUM 1142 bignum.c RBIGNUM(*modp)->sign = RBIGNUM(x)->sign;
RBIGNUM 1142 bignum.c RBIGNUM(*modp)->sign = RBIGNUM(x)->sign;
RBIGNUM 1147 bignum.c z = bignew(nx==ny?nx+2:nx+1, RBIGNUM(x)->sign==RBIGNUM(y)->sign);
RBIGNUM 1147 bignum.c z = bignew(nx==ny?nx+2:nx+1, RBIGNUM(x)->sign==RBIGNUM(y)->sign);
RBIGNUM 1218 bignum.c RBIGNUM(*divp)->len = i;
RBIGNUM 1233 bignum.c RBIGNUM(*modp)->len = ny;
RBIGNUM 1234 bignum.c RBIGNUM(*modp)->sign = RBIGNUM(x)->sign;
RBIGNUM 1234 bignum.c RBIGNUM(*modp)->sign = RBIGNUM(x)->sign;
RBIGNUM 1246 bignum.c if (RBIGNUM(x)->sign != RBIGNUM(y)->sign && RBIGNUM(mod)->len > 0) {
RBIGNUM 1246 bignum.c if (RBIGNUM(x)->sign != RBIGNUM(y)->sign && RBIGNUM(mod)->len > 0) {
RBIGNUM 1246 bignum.c if (RBIGNUM(x)->sign != RBIGNUM(y)->sign && RBIGNUM(mod)->len > 0) {
RBIGNUM 1407 bignum.c if (!RBIGNUM(y)->sign) {
RBIGNUM 1411 bignum.c if (!RBIGNUM(x)->sign) {
RBIGNUM 1415 bignum.c if (RBIGNUM(x)->len > RBIGNUM(y)->len) {
RBIGNUM 1415 bignum.c if (RBIGNUM(x)->len > RBIGNUM(y)->len) {
RBIGNUM 1416 bignum.c l1 = RBIGNUM(y)->len;
RBIGNUM 1417 bignum.c l2 = RBIGNUM(x)->len;
RBIGNUM 1420 bignum.c sign = RBIGNUM(y)->sign;
RBIGNUM 1423 bignum.c l1 = RBIGNUM(x)->len;
RBIGNUM 1424 bignum.c l2 = RBIGNUM(y)->len;
RBIGNUM 1427 bignum.c sign = RBIGNUM(x)->sign;
RBIGNUM 1429 bignum.c z = bignew(l2, RBIGNUM(x)->sign || RBIGNUM(y)->sign);
RBIGNUM 1429 bignum.c z = bignew(l2, RBIGNUM(x)->sign || RBIGNUM(y)->sign);
RBIGNUM 1438 bignum.c if (!RBIGNUM(z)->sign) get2comp(z, Qfalse);
RBIGNUM 1458 bignum.c if (!RBIGNUM(y)->sign) {
RBIGNUM 1462 bignum.c if (!RBIGNUM(x)->sign) {
RBIGNUM 1466 bignum.c if (RBIGNUM(x)->len > RBIGNUM(y)->len) {
RBIGNUM 1466 bignum.c if (RBIGNUM(x)->len > RBIGNUM(y)->len) {
RBIGNUM 1467 bignum.c l1 = RBIGNUM(y)->len;
RBIGNUM 1468 bignum.c l2 = RBIGNUM(x)->len;
RBIGNUM 1471 bignum.c sign = RBIGNUM(y)->sign;
RBIGNUM 1474 bignum.c l1 = RBIGNUM(x)->len;
RBIGNUM 1475 bignum.c l2 = RBIGNUM(y)->len;
RBIGNUM 1478 bignum.c sign = RBIGNUM(x)->sign;
RBIGNUM 1480 bignum.c z = bignew(l2, RBIGNUM(x)->sign && RBIGNUM(y)->sign);
RBIGNUM 1480 bignum.c z = bignew(l2, RBIGNUM(x)->sign && RBIGNUM(y)->sign);
RBIGNUM 1489 bignum.c if (!RBIGNUM(z)->sign) get2comp(z, Qfalse);
RBIGNUM 1510 bignum.c if (!RBIGNUM(y)->sign) {
RBIGNUM 1514 bignum.c if (!RBIGNUM(x)->sign) {
RBIGNUM 1518 bignum.c if (RBIGNUM(x)->len > RBIGNUM(y)->len) {
RBIGNUM 1518 bignum.c if (RBIGNUM(x)->len > RBIGNUM(y)->len) {
RBIGNUM 1519 bignum.c l1 = RBIGNUM(y)->len;
RBIGNUM 1520 bignum.c l2 = RBIGNUM(x)->len;
RBIGNUM 1523 bignum.c sign = RBIGNUM(y)->sign;
RBIGNUM 1526 bignum.c l1 = RBIGNUM(x)->len;
RBIGNUM 1527 bignum.c l2 = RBIGNUM(y)->len;
RBIGNUM 1530 bignum.c sign = RBIGNUM(x)->sign;
RBIGNUM 1532 bignum.c RBIGNUM(x)->sign = RBIGNUM(x)->sign?1:0;
RBIGNUM 1532 bignum.c RBIGNUM(x)->sign = RBIGNUM(x)->sign?1:0;
RBIGNUM 1533 bignum.c RBIGNUM(y)->sign = RBIGNUM(y)->sign?1:0;
RBIGNUM 1533 bignum.c RBIGNUM(y)->sign = RBIGNUM(y)->sign?1:0;
RBIGNUM 1534 bignum.c z = bignew(l2, !(RBIGNUM(x)->sign ^ RBIGNUM(y)->sign));
RBIGNUM 1534 bignum.c z = bignew(l2, !(RBIGNUM(x)->sign ^ RBIGNUM(y)->sign));
RBIGNUM 1543 bignum.c if (!RBIGNUM(z)->sign) get2comp(z, Qfalse);
RBIGNUM 1563 bignum.c len = RBIGNUM(x)->len;
RBIGNUM 1564 bignum.c z = bignew(len+s1+1, RBIGNUM(x)->sign);
RBIGNUM 1593 bignum.c if (s1 > RBIGNUM(x)->len) {
RBIGNUM 1594 bignum.c if (RBIGNUM(x)->sign)
RBIGNUM 1599 bignum.c if (!RBIGNUM(x)->sign) {
RBIGNUM 1604 bignum.c i = RBIGNUM(x)->len; j = i - s1;
RBIGNUM 1605 bignum.c z = bignew(j, RBIGNUM(x)->sign);
RBIGNUM 1612 bignum.c if (!RBIGNUM(x)->sign) {
RBIGNUM 1627 bignum.c if (!RBIGNUM(y)->sign || RBIGNUM(x)->sign)
RBIGNUM 1627 bignum.c if (!RBIGNUM(y)->sign || RBIGNUM(x)->sign)
RBIGNUM 1636 bignum.c if (!RBIGNUM(x)->sign) {
RBIGNUM 1637 bignum.c if (s1 >= RBIGNUM(x)->len) return INT2FIX(1);
RBIGNUM 1642 bignum.c if (s1 >= RBIGNUM(x)->len) return INT2FIX(0);
RBIGNUM 1657 bignum.c key = 0; digits = BDIGITS(x); len = RBIGNUM(x)->len;
RBIGNUM 1683 bignum.c if (!RBIGNUM(x)->sign) {
RBIGNUM 1685 bignum.c RBIGNUM(x)->sign = 1;
RBIGNUM 1696 bignum.c long len = RBIGNUM(max)->len;
RBIGNUM 1713 bignum.c return LONG2FIX(RBIGNUM(big)->len*SIZEOF_BDIGITS);
RBIGNUM 43 compar.c if (RBIGNUM(c)->sign) return Qtrue;
RBIGNUM 58 compar.c if (RBIGNUM(c)->sign) return Qtrue;
RBIGNUM 72 compar.c if (!RBIGNUM(c)->sign) return Qtrue;
RBIGNUM 87 compar.c if (!RBIGNUM(c)->sign) return Qtrue;
RBIGNUM 428 marshal.c char sign = RBIGNUM(obj)->sign ? '+' : '-';
RBIGNUM 429 marshal.c long len = RBIGNUM(obj)->len;
RBIGNUM 430 marshal.c BDIGIT *d = RBIGNUM(obj)->digits;
RBIGNUM 1479 numeric.c if (!RBIGNUM(idx)->sign || val >= 0)
RBIGNUM 228 random.c long len = RBIGNUM(vmax)->len;
RBIGNUM 435 sprintf.c if (!RBIGNUM(val)->sign) {