SCM_BIGNUM 29 ext/mt-random/mt-lib.c s ^= SCM_BIGNUM(init)->values[i]; SCM_BIGNUM 252 ext/mt-random/mt-random.c return genrand_int_small(mt, SCM_BIGNUM(n)->values[0]); SCM_BIGNUM 255 ext/mt-random/mt-random.c && SCM_BIGNUM(n)->values[0] == 0 SCM_BIGNUM 256 ext/mt-random/mt-random.c && SCM_BIGNUM(n)->values[1] == 1) { SCM_BIGNUM 253 ext/net/netlib.c SCM_RETURN(Scm_NormalizeBignum(SCM_BIGNUM(bn))); SCM_BIGNUM 562 ext/uvector/uvector.c return SCM_BIGNUM(x)->values[0]; SCM_BIGNUM 564 ext/uvector/uvector.c return ~(SCM_BIGNUM(x)->values[0]) + 1; SCM_BIGNUM 130 src/bignum.c (var_) = SCM_BIGNUM(alloca(BIGNUM_SIZE(size_))); \ SCM_BIGNUM 320 src/bignum.c b = SCM_BIGNUM(Scm_BignumComplement(b)); SCM_BIGNUM 429 src/bignum.c return Scm_NormalizeBignum(SCM_BIGNUM(c)); SCM_BIGNUM 554 src/bignum.c ScmBignum *r = SCM_BIGNUM(Scm_BignumCopy(bx)); SCM_BIGNUM 712 src/bignum.c r = bignum_add(r, SCM_BIGNUM(v)); SCM_BIGNUM 735 src/bignum.c r = bignum_sub(r, SCM_BIGNUM(v)); SCM_BIGNUM 871 src/bignum.c br = SCM_BIGNUM(Scm_BignumCopy(bx)); SCM_BIGNUM 906 src/bignum.c r = bignum_mul(r, SCM_BIGNUM(v)); SCM_BIGNUM 1067 src/bignum.c q = SCM_BIGNUM(Scm_BignumCopy(dividend)); SCM_BIGNUM 1070 src/bignum.c ScmBignum *bv = SCM_BIGNUM(Scm_MakeBignumFromSI(dd)); SCM_BIGNUM 1165 src/bignum.c yy = SCM_BIGNUM(Scm_BignumComplement(y)); SCM_BIGNUM 1171 src/bignum.c xx = SCM_BIGNUM(Scm_BignumComplement(x)); SCM_BIGNUM 1175 src/bignum.c xx = SCM_BIGNUM(Scm_BignumComplement(x)); SCM_BIGNUM 1176 src/bignum.c yy = SCM_BIGNUM(Scm_BignumComplement(y)); SCM_BIGNUM 1217 src/bignum.c yy = SCM_BIGNUM(Scm_BignumComplement(y)); SCM_BIGNUM 1225 src/bignum.c xx = SCM_BIGNUM(Scm_BignumComplement(x)); SCM_BIGNUM 1231 src/bignum.c xx = SCM_BIGNUM(Scm_BignumComplement(x)); SCM_BIGNUM 1232 src/bignum.c yy = SCM_BIGNUM(Scm_BignumComplement(y)); SCM_BIGNUM 1263 src/bignum.c q = SCM_BIGNUM(Scm_BignumCopy(b)); SCM_BIGNUM 371 src/extlib.c if (SCM_BIGNUMP(obj)) Scm_DumpBignum(SCM_BIGNUM(obj), SCM_CUROUT); SCM_BIGNUM 1958 src/extlib.c else if (SCM_BIGNUMP(bound)) modulo = Scm_BignumToUI(SCM_BIGNUM(bound), SCM_CLAMP_BOTH, NULL); SCM_BIGNUM 2006 src/gauche.h #define SCM_BIGNUM_SIZE(obj) SCM_BIGNUM(obj)->size SCM_BIGNUM 2007 src/gauche.h #define SCM_BIGNUM_SIGN(obj) SCM_BIGNUM(obj)->sign SCM_BIGNUM 135 src/hash.c u += SCM_BIGNUM(obj)->values[i]; SCM_BIGNUM 197 src/hash.c return SCM_BIGNUM(r)->values[0]; SCM_BIGNUM 249 src/number.c f = Scm_NormalizeBignum(SCM_BIGNUM(Scm_MakeBignumFromUIArray(1, values, 2))); SCM_BIGNUM 339 src/number.c return Scm_BignumToSI(SCM_BIGNUM(obj), clamp, oor); SCM_BIGNUM 372 src/number.c return Scm_BignumToUI(SCM_BIGNUM(obj), clamp, oor); SCM_BIGNUM 488 src/number.c return Scm_NormalizeBignum(SCM_BIGNUM(Scm_MakeBignumFromUIArray(0, val, 2))); SCM_BIGNUM 521 src/number.c return Scm_BignumToSI64(SCM_BIGNUM(obj), clamp, oor); SCM_BIGNUM 534 src/number.c return Scm_BignumToSI64(SCM_BIGNUM(b), clamp, oor); SCM_BIGNUM 542 src/number.c return Scm_BignumToSI64(SCM_BIGNUM(obj), clamp, oor); SCM_BIGNUM 586 src/number.c return Scm_BignumToUI64(SCM_BIGNUM(obj), clamp, oor); SCM_BIGNUM 598 src/number.c return Scm_BignumToUI64(SCM_BIGNUM(b), clamp, oor); SCM_BIGNUM 614 src/number.c return Scm_BignumToUI64(SCM_BIGNUM(obj), clamp, oor); SCM_BIGNUM 648 src/number.c else if (SCM_BIGNUMP(obj)) return Scm_BignumToDouble(SCM_BIGNUM(obj)); SCM_BIGNUM 678 src/number.c return (SCM_BIGNUM(obj)->values[0] & 1); SCM_BIGNUM 697 src/number.c obj = Scm_BignumCopy(SCM_BIGNUM(obj)); SCM_BIGNUM 749 src/number.c obj = Scm_BignumNegate(SCM_BIGNUM(obj)); SCM_BIGNUM 767 src/number.c double val = Scm_BignumToDouble(SCM_BIGNUM(obj)); SCM_BIGNUM 795 src/number.c obj = Scm_MakeFlonum(Scm_BignumToDouble(SCM_BIGNUM(obj))); SCM_BIGNUM 838 src/number.c return Scm_MakeFlonum(Scm_BignumToDouble(SCM_BIGNUM(obj))); SCM_BIGNUM 849 src/number.c return Scm_MakeComplex(Scm_BignumToDouble(SCM_BIGNUM(obj)), 0.0); SCM_BIGNUM 896 src/number.c arg0 = Scm_BignumAdd(SCM_BIGNUM(Scm_MakeBignumFromSI(result_int)), SCM_BIGNUM 897 src/number.c SCM_BIGNUM(arg1)); SCM_BIGNUM 922 src/number.c return Scm_BignumAddN(SCM_BIGNUM(arg0), Scm_Cons(arg1, args)); SCM_BIGNUM 934 src/number.c result_real += Scm_BignumToDouble(SCM_BIGNUM(arg1)); SCM_BIGNUM 958 src/number.c result_real += Scm_BignumToDouble(SCM_BIGNUM(arg1)); SCM_BIGNUM 999 src/number.c return Scm_BignumSubN(SCM_BIGNUM(big), args); SCM_BIGNUM 1003 src/number.c return Scm_BignumSubN(SCM_BIGNUM(big), Scm_Cons(arg1, args)); SCM_BIGNUM 1022 src/number.c return Scm_BignumSubN(SCM_BIGNUM(arg0), Scm_Cons(arg1, args)); SCM_BIGNUM 1034 src/number.c result_real -= Scm_BignumToDouble(SCM_BIGNUM(arg1)); SCM_BIGNUM 1058 src/number.c result_real -= Scm_BignumToDouble(SCM_BIGNUM(arg1)); SCM_BIGNUM 1101 src/number.c arg0 = Scm_BignumMulSI(SCM_BIGNUM(big), vv); SCM_BIGNUM 1106 src/number.c arg0 = Scm_BignumMulSI(SCM_BIGNUM(arg1), result_int); SCM_BIGNUM 1129 src/number.c return Scm_BignumMulN(SCM_BIGNUM(arg0), Scm_Cons(arg1, args)); SCM_BIGNUM 1138 src/number.c result_real *= Scm_BignumToDouble(SCM_BIGNUM(arg1)); SCM_BIGNUM 1162 src/number.c double dd = Scm_BignumToDouble(SCM_BIGNUM(arg1)); SCM_BIGNUM 1213 src/number.c ScmObj div = Scm_BignumDivSI(SCM_BIGNUM(arg0), SCM_BIGNUM 1217 src/number.c result_real = Scm_BignumToDouble(SCM_BIGNUM(arg0)); SCM_BIGNUM 1225 src/number.c ScmObj divrem = Scm_BignumDivRem(SCM_BIGNUM(arg0), SCM_BIGNUM(arg1)); SCM_BIGNUM 1227 src/number.c result_real = Scm_BignumToDouble(SCM_BIGNUM(arg0)); SCM_BIGNUM 1236 src/number.c result_real = Scm_BignumToDouble(SCM_BIGNUM(arg0)); SCM_BIGNUM 1241 src/number.c result_real = Scm_BignumToDouble(SCM_BIGNUM(arg0)); SCM_BIGNUM 1254 src/number.c div_real = Scm_BignumToDouble(SCM_BIGNUM(arg1)); SCM_BIGNUM 1282 src/number.c div_real = Scm_BignumToDouble(SCM_BIGNUM(arg1)); SCM_BIGNUM 1342 src/number.c ScmObj q = Scm_BignumDivSI(SCM_BIGNUM(x), SCM_INT_VALUE(y), &r); SCM_BIGNUM 1346 src/number.c ScmObj qr = Scm_BignumDivRem(SCM_BIGNUM(x), SCM_BIGNUM(y)); SCM_BIGNUM 1350 src/number.c rx = Scm_BignumToDouble(SCM_BIGNUM(x)); SCM_BIGNUM 1362 src/number.c ry = Scm_BignumToDouble(SCM_BIGNUM(y)); SCM_BIGNUM 1417 src/number.c return Scm_BignumAddSI(SCM_BIGNUM(y), SCM_INT_VALUE(x)); SCM_BIGNUM 1434 src/number.c Scm_BignumDivSI(SCM_BIGNUM(x), iy, &rem); SCM_BIGNUM 1444 src/number.c ScmObj rem = SCM_CDR(Scm_BignumDivRem(SCM_BIGNUM(x), SCM_BIGNUM(y))); SCM_BIGNUM 1449 src/number.c return Scm_BignumAdd(SCM_BIGNUM(y), SCM_BIGNUM(rem)); SCM_BIGNUM 1451 src/number.c return Scm_BignumAddSI(SCM_BIGNUM(y), SCM_INT_VALUE(rem)); SCM_BIGNUM 1456 src/number.c rx = Scm_BignumToDouble(SCM_BIGNUM(x)); SCM_BIGNUM 1470 src/number.c ry = Scm_BignumToDouble(SCM_BIGNUM(y)); SCM_BIGNUM 1623 src/number.c return Scm_BignumCmp(SCM_BIGNUM(Scm_MakeBignumFromSI(SCM_INT_VALUE(arg0))), SCM_BIGNUM 1624 src/number.c SCM_BIGNUM(arg1)); SCM_BIGNUM 1641 src/number.c return Scm_BignumCmp(SCM_BIGNUM(Scm_MakeBignumFromDouble(SCM_FLONUM_VALUE(arg0))), SCM_BIGNUM 1642 src/number.c SCM_BIGNUM(arg1)); SCM_BIGNUM 1647 src/number.c return Scm_BignumCmp(SCM_BIGNUM(arg0), SCM_BIGNUM 1648 src/number.c SCM_BIGNUM(Scm_MakeBignumFromSI(SCM_INT_VALUE(arg1)))); SCM_BIGNUM 1650 src/number.c return Scm_BignumCmp(SCM_BIGNUM(arg0), SCM_BIGNUM 1651 src/number.c SCM_BIGNUM(Scm_MakeBignumFromDouble(SCM_FLONUM_VALUE(arg1)))); SCM_BIGNUM 1653 src/number.c return Scm_BignumCmp(SCM_BIGNUM(arg0), SCM_BIGNUM(arg1)); SCM_BIGNUM 1784 src/number.c return Scm_BignumAsh(SCM_BIGNUM(big), cnt); SCM_BIGNUM 1787 src/number.c return Scm_BignumAsh(SCM_BIGNUM(x), cnt); SCM_BIGNUM 1800 src/number.c return Scm_Negate(Scm_BignumAddSI(SCM_BIGNUM(x), 1)); SCM_BIGNUM 1812 src/number.c return Scm_MakeInteger(SCM_INT_VALUE(x)&SCM_BIGNUM(y)->values[0]); SCM_BIGNUM 1817 src/number.c return Scm_MakeInteger(SCM_INT_VALUE(y)&SCM_BIGNUM(x)->values[0]); SCM_BIGNUM 1821 src/number.c return Scm_BignumLogAnd(SCM_BIGNUM(x), SCM_BIGNUM(y)); SCM_BIGNUM 1836 src/number.c return Scm_BignumLogIor(SCM_BIGNUM(x), SCM_BIGNUM(y)); SCM_BIGNUM 1852 src/number.c return Scm_BignumLogXor(SCM_BIGNUM(x), SCM_BIGNUM(y)); SCM_BIGNUM 1924 src/number.c return Scm_BignumCmp3U(SCM_BIGNUM(bx), SCM_BIGNUM(bd), SCM_BIGNUM(by)); SCM_BIGNUM 2125 src/number.c r = Scm_BignumToString(SCM_BIGNUM(Scm_MakeBignumFromSI(SCM_INT_VALUE(obj))), SCM_BIGNUM 2130 src/number.c r = Scm_BignumToString(SCM_BIGNUM(obj), radix, use_upper); SCM_BIGNUM 2250 src/number.c value_big = SCM_BIGNUM(Scm_BignumCopy(SCM_BIGNUM(initval))); SCM_BIGNUM 2302 src/number.c return Scm_NormalizeBignum(SCM_BIGNUM(value_big)); SCM_BIGNUM 85 src/system.c || SCM_BIGNUM(i)->values[0] > LONG_MAX) { SCM_BIGNUM 1339 src/system.c sec = Scm_BignumDivSI(SCM_BIGNUM(timeout), 1000000, &usec);