u 941 src/bignum.c ScmBignum *u, *v; u 962 src/bignum.c u = make_bignum(dividend->size + 1); /*will be returned as a remainder */ u 972 src/bignum.c bignum_lshift(u, dividend, d); u 979 src/bignum.c Scm_Printf(SCM_CUROUT, "u="); Scm_DumpBignum(u, SCM_CUROUT); u 985 src/bignum.c u_long uu = (DIGIT(u, j+n) << HALF_BITS) + DIGIT(u, j+n-1); u 993 src/bignum.c while ((qq*vn_2 > (rr<<HALF_BITS)+DIGIT(u, j+n-2)) && (rr < HALF_WORD)) { u 1003 src/bignum.c uj = DIGIT2(u, j+k); u 1006 src/bignum.c SETDIGIT2(u, j+k, uj2); u 1010 src/bignum.c Scm_Printf(SCM_CUROUT, "u="); Scm_DumpBignum(u, SCM_CUROUT); u 1018 src/bignum.c uj = DIGIT(u, j+k) + vv + cy; u 1020 src/bignum.c SETDIGIT(u, j+k, uj); u 1022 src/bignum.c uj = DIGIT(u, j+n) + cy; u 1023 src/bignum.c SETDIGIT(u, j+n, uj); u 1027 src/bignum.c bignum_rshift(u, u, d); u 1030 src/bignum.c Scm_Printf(SCM_CUROUT, "\nrem u="); Scm_DumpBignum(u, SCM_CUROUT); u 1033 src/bignum.c return u; u 133 src/hash.c unsigned long u = 0; u 135 src/hash.c u += SCM_BIGNUM(obj)->values[i]; u 137 src/hash.c SMALL_INT_HASH(hashval, u);