params 624 src/write.c ScmObj *params, int nparams, params 632 src/write.c if (nparams>0 && SCM_INTP(params[0])) mincol = SCM_INT_VALUE(params[0]); params 633 src/write.c if (nparams>1 && SCM_INTP(params[1])) colinc = SCM_INT_VALUE(params[1]); params 634 src/write.c if (nparams>2 && SCM_INTP(params[2])) minpad = SCM_INT_VALUE(params[2]); params 635 src/write.c if (nparams>3 && SCM_CHARP(params[3])) padchar = SCM_CHAR_VALUE(params[3]); params 636 src/write.c if (nparams>4 && SCM_INTP(params[4])) maxcol = SCM_INT_VALUE(params[4]); params 668 src/write.c ScmObj *params, int nparams, int radix, params 683 src/write.c if (nparams>0 && SCM_INTP(params[0])) mincol = SCM_INT_VALUE(params[0]); params 684 src/write.c if (nparams>1 && SCM_CHARP(params[1])) padchar = SCM_CHAR_VALUE(params[1]); params 685 src/write.c if (nparams>2 && SCM_CHARP(params[2])) commachar = SCM_CHAR_VALUE(params[2]); params 686 src/write.c if (nparams>3 && SCM_INTP(params[3])) commainterval = SCM_INT_VALUE(params[3]); params 740 src/write.c ScmObj params[MAX_PARAMS]; params 770 src/write.c format_sexp(out, arg, params, numParams, atflag, params 780 src/write.c format_sexp(out, arg, params, numParams, atflag, params 789 src/write.c format_integer(out, arg, params, numParams, 10, params 803 src/write.c format_integer(out, arg, params, numParams, 2, params 817 src/write.c format_integer(out, arg, params, numParams, 8, params 831 src/write.c format_integer(out, arg, params, numParams, 16, params 839 src/write.c if (!SCM_INTP(params[0])) goto badfmt; params 840 src/write.c argindex = SCM_INT_VALUE(params[0]); params 868 src/write.c params[numParams++] = arg; params 891 src/write.c params[numParams++] = SCM_MAKE_CHAR(ch); params 908 src/write.c params[numParams++] = Scm_MakeInteger(sign*value); params 920 src/write.c params[numParams++] = SCM_FALSE;