by 66 gc/pthread_support.c --> Macro replaced by USE_COMPILER_TLS by 91 src/bignum.c static ScmBignum *bignum_add_int(ScmBignum *br, ScmBignum *bx, ScmBignum *by); by 437 src/bignum.c int Scm_BignumCmp(ScmBignum *bx, ScmBignum *by) by 441 src/bignum.c if (bx->sign < by->sign) return -1; by 442 src/bignum.c if (bx->sign > by->sign) return 1; by 443 src/bignum.c if (bx->size < by->size) return (bx->sign > 0) ? -1 : 1; by 444 src/bignum.c if (bx->size > by->size) return (bx->sign > 0) ? 1 : -1; by 447 src/bignum.c if (bx->values[i] < by->values[i]) return (bx->sign > 0) ? -1 : 1; by 448 src/bignum.c if (bx->values[i] > by->values[i]) return (bx->sign > 0) ? 1 : -1; by 454 src/bignum.c int Scm_BignumAbsCmp(ScmBignum *bx, ScmBignum *by) by 458 src/bignum.c if (bx->size < by->size) return -1; by 459 src/bignum.c if (bx->size > by->size) return 1; by 461 src/bignum.c if (bx->values[i] < by->values[i]) return -1; by 462 src/bignum.c if (bx->values[i] > by->values[i]) return 1; by 474 src/bignum.c int Scm_BignumCmp3U(ScmBignum *bx, ScmBignum *off, ScmBignum *by) by 476 src/bignum.c int xsize = SCM_BIGNUM_SIZE(bx), ysize = SCM_BIGNUM_SIZE(by); by 482 src/bignum.c if (osize < ysize && by->values[ysize-1] > 1) { by 486 src/bignum.c if (off->values[osize-1] > by->values[ysize-1]) return 1; by 487 src/bignum.c if (off->values[osize-1] < by->values[ysize-1]-1) return -1; by 494 src/bignum.c if (bx->values[xsize-1] > by->values[ysize-1]) return 1; by 496 src/bignum.c if (bx->values[xsize-1] < by->values[ysize-1]-1) return -1; by 501 src/bignum.c if (c > 0 || w > by->values[ysize-1]) return 1; by 502 src/bignum.c if (w < by->values[ysize-1] - 1) return -1; by 510 src/bignum.c if (br->size < by->size) return -1; by 512 src/bignum.c if (i >= by->size) { by 516 src/bignum.c if (br->values[i] < by->values[i]) return -1; by 517 src/bignum.c if (br->values[i] > by->values[i]) return 1; by 560 src/bignum.c static ScmBignum *bignum_add_int(ScmBignum *br, ScmBignum *bx, ScmBignum *by) by 564 src/bignum.c int ysize = SCM_BIGNUM_SIZE(by); by 574 src/bignum.c y = by->values[i]; by 584 src/bignum.c y = by->values[i]; by 592 src/bignum.c static ScmBignum *bignum_sub_int(ScmBignum *br, ScmBignum *bx, ScmBignum *by) by 596 src/bignum.c int ysize = SCM_BIGNUM_SIZE(by); by 606 src/bignum.c y = by->values[i]; by 616 src/bignum.c y = by->values[i]; by 627 src/bignum.c static ScmBignum *bignum_add(ScmBignum *bx, ScmBignum *by) by 629 src/bignum.c int rsize = bignum_safe_size_for_add(bx, by); by 632 src/bignum.c if (SCM_BIGNUM_SIGN(bx) == SCM_BIGNUM_SIGN(by)) { by 633 src/bignum.c bignum_add_int(br, bx, by); by 635 src/bignum.c bignum_sub_int(br, bx, by); by 641 src/bignum.c static ScmBignum *bignum_sub(ScmBignum *bx, ScmBignum *by) by 643 src/bignum.c int rsize = bignum_safe_size_for_add(bx, by); by 646 src/bignum.c if (SCM_BIGNUM_SIGN(bx) == SCM_BIGNUM_SIGN(by)) { by 647 src/bignum.c bignum_sub_int(br, bx, by); by 649 src/bignum.c bignum_add_int(br, bx, by); by 682 src/bignum.c ScmObj Scm_BignumAdd(ScmBignum *bx, ScmBignum *by) by 684 src/bignum.c return Scm_NormalizeBignum(bignum_add(bx, by)); by 687 src/bignum.c ScmObj Scm_BignumSub(ScmBignum *bx, ScmBignum *by) by 689 src/bignum.c return Scm_NormalizeBignum(bignum_sub(bx, by)); by 847 src/bignum.c static ScmBignum *bignum_mul(ScmBignum *bx, ScmBignum *by) by 850 src/bignum.c ScmBignum *br = make_bignum(bx->size + by->size); by 851 src/bignum.c for (i=0; i<by->size; i++) { by 852 src/bignum.c bignum_mul_word(br, bx, by->values[i], i); by 854 src/bignum.c br->sign = bx->sign * by->sign; by 884 src/bignum.c ScmObj Scm_BignumMul(ScmBignum *bx, ScmBignum *by) by 886 src/bignum.c ScmBignum *br = bignum_mul(bx, by); by 2058 src/gauche.h SCM_EXTERN int Scm_BignumCmp(ScmBignum *bx, ScmBignum *by); by 2059 src/gauche.h SCM_EXTERN int Scm_BignumAbsCmp(ScmBignum *bx, ScmBignum *by); by 2060 src/gauche.h SCM_EXTERN int Scm_BignumCmp3U(ScmBignum *bx, ScmBignum *off, ScmBignum *by); by 2063 src/gauche.h SCM_EXTERN ScmObj Scm_BignumAdd(ScmBignum *bx, ScmBignum *by); by 2066 src/gauche.h SCM_EXTERN ScmObj Scm_BignumSub(ScmBignum *bx, ScmBignum *by); by 2069 src/gauche.h SCM_EXTERN ScmObj Scm_BignumMul(ScmBignum *bx, ScmBignum *by); by 2073 src/gauche.h SCM_EXTERN ScmObj Scm_BignumDivRem(ScmBignum *bx, ScmBignum *by); by 2076 src/gauche.h SCM_EXTERN ScmObj Scm_BignumLogAnd(ScmBignum *bx, ScmBignum *by); by 2077 src/gauche.h SCM_EXTERN ScmObj Scm_BignumLogIor(ScmBignum *bx, ScmBignum *by); by 2078 src/gauche.h SCM_EXTERN ScmObj Scm_BignumLogXor(ScmBignum *bx, ScmBignum *by); by 1923 src/number.c ScmObj by = SCM_BIGNUMP(y)? y : Scm_MakeBignumFromSI(SCM_INT_VALUE(y)); by 1924 src/number.c return Scm_BignumCmp3U(SCM_BIGNUM(bx), SCM_BIGNUM(bd), SCM_BIGNUM(by));