out 16 examples/mqueue-cpp/mqueue_glue.cpp static void mqueue_print(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 20 examples/mqueue-cpp/mqueue_glue.cpp Scm_Printf(out, "#<mqueue \"%s\">", queue_name); out 136 ext/charconv/charconv.c ScmObj out = Scm_MakeOutputStringPort(TRUE); out 137 ext/charconv/charconv.c Scm_Printf(SCM_PORT(out), "[conv(%s->%s) %s %S]", out 140 ext/charconv/charconv.c return Scm_GetOutputStringUnsafe(SCM_PORT(out)); out 531 ext/charconv/charconv.c ScmChar out; out 532 ext/charconv/charconv.c SCM_CHAR_GET(outbuf, out); out 533 ext/charconv/charconv.c return out; out 27 ext/dbm/gdbm.c static void gdbm_print(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 29 ext/dbm/gdbm.c Scm_Printf(out, "#<gdbm-file %S>", SCM_GDBM(obj)->name); out 33 ext/dbm/ndbm.c static void ndbm_print(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 35 ext/dbm/ndbm.c Scm_Printf(out, "#<ndbm-file %S>", SCM_NDBM(obj)->name); out 113 ext/net/netlib.c ScmPort *out = SCM_PORT(Scm_MakeOutputStringPort(TRUE)); out 117 ext/net/netlib.c Scm_Printf(out, "%d.%d.%d.%d:%d", out 123 ext/net/netlib.c SCM_RETURN(Scm_GetOutputStringUnsafe(out)); out 199 ext/net/netlib.c ScmPort *out = SCM_PORT(Scm_MakeOutputStringPort(TRUE)); out 203 ext/net/netlib.c Scm_Printf(out, "[%s]:%d", buf, ntohs(a->addr.sin6_port)); out 204 ext/net/netlib.c SCM_RETURN(Scm_GetOutputStringUnsafe(out)); out 196 ext/uvector/uvector.c static inline void int64print(ScmPort *out, ScmInt64 v) out 199 ext/uvector/uvector.c Scm_Printf(out, "%S", Scm_MakeInteger64(v)); out 203 ext/uvector/uvector.c Scm_Printf(out, "%s", buf); out 205 ext/uvector/uvector.c Scm_Printf(out, "%ld", v); out 209 ext/uvector/uvector.c static inline void uint64print(ScmPort *out, ScmUInt64 v) out 212 ext/uvector/uvector.c Scm_Printf(out, "%S", Scm_MakeIntegerU64(v)); out 216 ext/uvector/uvector.c Scm_Printf(out, "%s", buf); out 218 ext/uvector/uvector.c Scm_Printf(out, "%lu", v); out 758 ext/uvector/uvector.c static void print_s8vector(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 761 ext/uvector/uvector.c Scm_Printf(out, "#s8("); out 764 ext/uvector/uvector.c if (i != 0) Scm_Printf(out, " "); out 765 ext/uvector/uvector.c Scm_Printf(out, "%d", elt); out 767 ext/uvector/uvector.c Scm_Printf(out, ")"); out 962 ext/uvector/uvector.c static void print_u8vector(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 965 ext/uvector/uvector.c Scm_Printf(out, "#u8("); out 968 ext/uvector/uvector.c if (i != 0) Scm_Printf(out, " "); out 969 ext/uvector/uvector.c Scm_Printf(out, "%d", elt); out 971 ext/uvector/uvector.c Scm_Printf(out, ")"); out 1166 ext/uvector/uvector.c static void print_s16vector(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 1169 ext/uvector/uvector.c Scm_Printf(out, "#s16("); out 1172 ext/uvector/uvector.c if (i != 0) Scm_Printf(out, " "); out 1173 ext/uvector/uvector.c Scm_Printf(out, "%d", elt); out 1175 ext/uvector/uvector.c Scm_Printf(out, ")"); out 1370 ext/uvector/uvector.c static void print_u16vector(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 1373 ext/uvector/uvector.c Scm_Printf(out, "#u16("); out 1376 ext/uvector/uvector.c if (i != 0) Scm_Printf(out, " "); out 1377 ext/uvector/uvector.c Scm_Printf(out, "%d", elt); out 1379 ext/uvector/uvector.c Scm_Printf(out, ")"); out 1574 ext/uvector/uvector.c static void print_s32vector(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 1577 ext/uvector/uvector.c Scm_Printf(out, "#s32("); out 1580 ext/uvector/uvector.c if (i != 0) Scm_Printf(out, " "); out 1581 ext/uvector/uvector.c Scm_Printf(out, "%d", elt); out 1583 ext/uvector/uvector.c Scm_Printf(out, ")"); out 1778 ext/uvector/uvector.c static void print_u32vector(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 1781 ext/uvector/uvector.c Scm_Printf(out, "#u32("); out 1784 ext/uvector/uvector.c if (i != 0) Scm_Printf(out, " "); out 1785 ext/uvector/uvector.c Scm_Printf(out, "%u", elt); out 1787 ext/uvector/uvector.c Scm_Printf(out, ")"); out 1982 ext/uvector/uvector.c static void print_s64vector(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 1985 ext/uvector/uvector.c Scm_Printf(out, "#s64("); out 1988 ext/uvector/uvector.c if (i != 0) Scm_Printf(out, " "); out 1989 ext/uvector/uvector.c int64print(out, elt); out 1991 ext/uvector/uvector.c Scm_Printf(out, ")"); out 2186 ext/uvector/uvector.c static void print_u64vector(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 2189 ext/uvector/uvector.c Scm_Printf(out, "#u64("); out 2192 ext/uvector/uvector.c if (i != 0) Scm_Printf(out, " "); out 2193 ext/uvector/uvector.c uint64print(out, elt); out 2195 ext/uvector/uvector.c Scm_Printf(out, ")"); out 2390 ext/uvector/uvector.c static void print_f32vector(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 2393 ext/uvector/uvector.c Scm_Printf(out, "#f32("); out 2396 ext/uvector/uvector.c if (i != 0) Scm_Printf(out, " "); out 2397 ext/uvector/uvector.c Scm_Printf(out, "%.9g", elt); out 2399 ext/uvector/uvector.c Scm_Printf(out, ")"); out 2594 ext/uvector/uvector.c static void print_f64vector(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 2597 ext/uvector/uvector.c Scm_Printf(out, "#f64("); out 2600 ext/uvector/uvector.c if (i != 0) Scm_Printf(out, " "); out 2601 ext/uvector/uvector.c Scm_PrintDouble(out, (double)elt, 0); out 2603 ext/uvector/uvector.c Scm_Printf(out, ")"); out 172 gc/checksums.c if (index >= NSUMS) goto out; out 175 gc/checksums.c out: out 161 gc/cord/cordprnt.c int CORD_vsprintf(CORD * out, CORD format, va_list args) out 337 gc/cord/cordprnt.c *out = CORD_balance(CORD_ec_to_cord(result)); out 341 gc/cord/cordprnt.c int CORD_sprintf(CORD * out, CORD format, ...) out 347 gc/cord/cordprnt.c result = CORD_vsprintf(out, format, args); out 356 gc/cord/cordprnt.c CORD out; out 359 gc/cord/cordprnt.c result = CORD_vsprintf(&out, format, args); out 361 gc/cord/cordprnt.c if (result > 0) CORD_put(out, f); out 368 gc/cord/cordprnt.c CORD out; out 370 gc/cord/cordprnt.c result = CORD_vsprintf(&out, format, args); out 371 gc/cord/cordprnt.c if (result > 0) CORD_put(out, f); out 379 gc/cord/cordprnt.c CORD out; out 382 gc/cord/cordprnt.c result = CORD_vsprintf(&out, format, args); out 384 gc/cord/cordprnt.c if (result > 0) CORD_put(out, stdout); out 391 gc/cord/cordprnt.c CORD out; out 393 gc/cord/cordprnt.c result = CORD_vsprintf(&out, format, args); out 394 gc/cord/cordprnt.c if (result > 0) CORD_put(out, stdout); out 401 gc/cord/de.c FILE * out; out 504 gc/cord/de.c if ((out = fopen(CORD_to_const_char_star(name), "wb")) == NULL out 505 gc/cord/de.c || CORD_put(current, out) == EOF) { out 509 gc/cord/de.c fclose(out); out 188 gc/dbg_mlc.c goto out; out 192 gc/dbg_mlc.c goto out; out 199 gc/dbg_mlc.c goto out; out 202 gc/dbg_mlc.c goto out; out 205 gc/dbg_mlc.c goto out; out 215 gc/dbg_mlc.c out:; out 248 gc/finalize.c if (((unsigned long)link & (ALIGNMENT-1))) goto out; out 270 gc/finalize.c out: out 318 gc/include/cord.h int CORD_sprintf(CORD * out, CORD format, ...); out 319 gc/include/cord.h int CORD_vsprintf(CORD * out, CORD format, va_list args); out 943 gc/include/private/gcconfig.h Linux Sparc/a.out not supported out 134 gc/malloc.c if (!GC_alloc_reclaim_list(kind)) goto out; out 137 gc/malloc.c if (op == 0) goto out; out 158 gc/malloc.c out: out 447 gc/mallocx.c goto out; out 479 gc/mallocx.c goto out; out 506 gc/mallocx.c goto out; out 516 gc/mallocx.c out: out 816 gc/misc.c if (GC_incremental) goto out; out 818 gc/misc.c if (GC_no_win32_dlls) goto out; out 826 gc/misc.c if (GC_incremental) goto out; out 841 gc/misc.c out: out 4166 gc/os_dep.c if (will_fail) goto out; out 4172 gc/os_dep.c goto out; out 4186 gc/os_dep.c goto out; out 4201 gc/os_dep.c goto out; out 4209 gc/os_dep.c goto out; out 4228 gc/os_dep.c out:; out 877 gc/solaris_threads.c goto out; out 885 gc/solaris_threads.c goto out; out 889 gc/solaris_threads.c goto out; out 901 gc/solaris_threads.c out: out 94 src/bignum.c int Scm_DumpBignum(ScmBignum *b, ScmPort *out); out 1276 src/bignum.c int Scm_DumpBignum(ScmBignum *b, ScmPort *out) out 1279 src/bignum.c Scm_Printf(out, "#<bignum "); out 1280 src/bignum.c if (b->sign < 0) SCM_PUTC('-', out); out 1282 src/bignum.c Scm_Printf(out, "%08x ", b->values[i]); out 1284 src/bignum.c SCM_PUTC('>', out); out 167 src/char.c static void charset_print(ScmObj obj, ScmPort *out, ScmWriteContext*); out 196 src/char.c static void charset_print_ch(ScmPort *out, ScmChar ch) out 199 src/char.c Scm_Printf(out, "\\x%02x", ch); out 205 src/char.c Scm_Printf(out, "%c", chbuf[i]); out 210 src/char.c static void charset_print(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 216 src/char.c Scm_Printf(out, "#["); out 219 src/char.c charset_print_ch(out, code); out 224 src/char.c if (code - prev > 2) Scm_Printf(out, "-"); out 225 src/char.c charset_print_ch(out, code-1); out 232 src/char.c if (prev < 0x7e) Scm_Printf(out, "-"); out 233 src/char.c charset_print_ch(out, code-1); out 237 src/char.c charset_print_ch(out, r->lo); out 239 src/char.c if (r->hi - r->lo > 2) Scm_Printf(out, "-"); out 240 src/char.c charset_print_ch(out, r->hi); out 242 src/char.c Scm_Printf(out, "]", obj); out 1680 src/class.c static void slot_accessor_print(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 1684 src/class.c Scm_Printf(out, "#<slot-accessor %S.%S ", out 1687 src/class.c if (sa->getter) Scm_Printf(out, "native"); out 1688 src/class.c else if (!SCM_FALSEP(sa->schemeGetter)) Scm_Printf(out, "proc"); out 1689 src/class.c else if (sa->slotNumber >= 0) Scm_Printf(out, "%d", sa->slotNumber); out 1690 src/class.c else Scm_Printf(out, "unknown"); out 1692 src/class.c Scm_Printf(out, " %S", sa->initKeyword); out 1693 src/class.c Scm_Printf(out, ">"); out 2449 src/class.c static void next_method_print(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 2453 src/class.c Scm_Printf(out, "#<next-method %S %S>", nm->methods, args); out 70 src/code.c static void compiled_code_print(ScmObj obj, ScmPort *out, ScmWriteContext *c) out 72 src/code.c Scm_Printf(out, "#<compiled-code %S@%p>", out 144 src/code.c ScmPort *out = SCM_PORT(Scm_MakeOutputStringPort(TRUE)); out 154 src/code.c Scm_Printf(out, " %4d %s ", i, insn_name); out 157 src/code.c Scm_Printf(out, " %4d %s(%d) ", i, insn_name, out 161 src/code.c Scm_Printf(out, " %4d %s(%d,%d) ", i, insn_name, out 167 src/code.c Scm_Printf(out, "%d", (ScmWord*)p[i+1] - cc->code); out 171 src/code.c Scm_Printf(out, "%S", p[i+1]); out 175 src/code.c Scm_Printf(out, "%S, %d", p[i+1], (ScmWord*)p[i+2] - cc->code); out 179 src/code.c Scm_Printf(out, "#<lambda %d>", clonum); out 186 src/code.c Scm_Printf(out, "("); out 192 src/code.c Scm_Printf(out, "#<lambda %d>", clonum); out 196 src/code.c Scm_Printf(out, ")"); out 204 src/code.c s = Scm_GetOutputStringUnsafe(out); out 744 src/error.c Scm_Printf(out, "%3d %66.1S\n", (depth), Scm_UnwrapSyntax(expr)); out 746 src/error.c void Scm_ShowStackTrace(ScmPort *out, ScmObj stacklite, out 765 src/error.c Scm_Printf(out, " At line %S of %S\n", out 769 src/error.c Scm_Printf(out, "%A:%S:\n", out 776 src/error.c Scm_Printf(out, " [unknown location]\n"); out 779 src/error.c Scm_Printf(out, "[unknown location]:\n"); out 784 src/error.c Scm_Printf(out, "\n"); out 791 src/error.c Scm_Printf(out, "... (more stack dump truncated)\n"); out 806 src/error.c static void Scm_PrintDefaultErrorHeading(ScmObj e, ScmPort *out) out 820 src/error.c Scm_Printf(out, "*** %s: %A\n", heading, msg); out 822 src/error.c Scm_Printf(out, "*** %s\n", heading); out 825 src/error.c Scm_Printf(out, "*** ERROR: unhandled exeption: %S\n", e); out 3823 src/extlib.c int b; ScmPort *out = SCM_PORT(Scm_MakeOutputStringPort(TRUE)); out 3827 src/extlib.c Scm_PutbUnsafe(b, out); out 3829 src/extlib.c SCM_RETURN(Scm_GetOutputString(out)); out 2487 src/gauche.h SCM_EXTERN void Scm_ShowStackTrace(ScmPort *out, ScmObj stacklite, out 920 src/load.c static void autoload_print(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 922 src/load.c Scm_Printf(out, "#<autoload %A::%A (%A)>", out 203 src/regexp.c static void regexp_print(ScmObj rx, ScmPort *out, ScmWriteContext *ctx) out 206 src/regexp.c Scm_Printf(out, "#/%A/", SCM_REGEXP(rx)->pattern); out 209 src/regexp.c Scm_Printf(out, "#<regexp %p>", rx); out 316 src/signal.c static void sigset_print(ScmObj obj, ScmPort *out, ScmWriteContext *ctx); out 322 src/signal.c void sigset_print(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 324 src/signal.c Scm_Printf(out, "#<sys-sigset ["); out 325 src/signal.c display_sigset(&SCM_SYS_SIGSET(obj)->set, out); out 326 src/signal.c Scm_Printf(out, "]>"); out 43 src/string.c void Scm_DStringDump(FILE *out, ScmDString *dstr); out 87 src/string.c void Scm_StringDump(FILE *out, ScmObj str) out 94 src/string.c fprintf(out, "STR(len=%d,siz=%d) \"", SCM_STRING_BODY_LENGTH(b), s); out 98 src/string.c putc(*p, out); out 102 src/string.c fputs("...\"\n", out); out 104 src/string.c fputs("\"\n", out); out 1563 src/string.c void Scm_DStringDump(FILE *out, ScmDString *dstr) out 1565 src/string.c fprintf(out, "DString %p\n", dstr); out 1568 src/string.c fprintf(out, " chunk0[%3d] = \"", dstr->init.bytes); out 1569 src/string.c fwrite(dstr->init.data, 1, dstr->init.bytes, out); out 1570 src/string.c fprintf(out, "\"\n"); out 1573 src/string.c fprintf(out, " chunk%d[%3d] = \"", i, size); out 1574 src/string.c fwrite(chain->chunk->data, 1, size, out); out 1575 src/string.c fprintf(out, "\"\n"); out 1579 src/string.c fprintf(out, " chunk0[%3d] = \"", size); out 1580 src/string.c fwrite(dstr->init.data, 1, size, out); out 1581 src/string.c fprintf(out, "\"\n"); out 17 src/test-arith.c void message(FILE *out, const char *m, int filler) out 20 src/test-arith.c fprintf(out, "%s", m); out 24 src/test-arith.c for (i=0; i<len; i++) putc(filler, out); out 26 src/test-arith.c putc('\n', out); out 12 src/test-vmstack.c void message(FILE *out, const char *m, int filler) out 15 src/test-vmstack.c fprintf(out, "%s", m); out 19 src/test-vmstack.c for (i=0; i<len; i++) putc(filler, out); out 21 src/test-vmstack.c putc('\n', out); out 3787 src/vm.c static void dump_env(ScmEnvFrame *env, ScmPort *out) out 3790 src/vm.c Scm_Printf(out, " %p %55.1S\n", env, env->info); out 3791 src/vm.c Scm_Printf(out, " up=%p size=%d\n", env->up, env->size); out 3792 src/vm.c Scm_Printf(out, " ["); out 3794 src/vm.c Scm_Printf(out, " %S", ENV_DATA(env, i)); out 3796 src/vm.c Scm_Printf(out, " ]\n"); out 3801 src/vm.c ScmPort *out = vm->curerr; out 3807 src/vm.c Scm_Printf(out, "VM %p -----------------------------------------------------------\n", vm); out 3808 src/vm.c Scm_Printf(out, " pc: %08x ", vm->pc); out 3809 src/vm.c Scm_Printf(out, "(%08x)\n", *vm->pc); out 3810 src/vm.c Scm_Printf(out, " sp: %p base: %p [%p-%p]\n", vm->sp, vm->stackBase, out 3812 src/vm.c Scm_Printf(out, " argp: %p\n", vm->argp); out 3813 src/vm.c Scm_Printf(out, " val0: %#65.1S\n", vm->val0); out 3815 src/vm.c Scm_Printf(out, " envs:\n"); out 3817 src/vm.c dump_env(env, out); out 3821 src/vm.c Scm_Printf(out, "conts:\n"); out 3823 src/vm.c Scm_Printf(out, " %p\n", cont); out 3824 src/vm.c Scm_Printf(out, " env = %p\n", cont->env); out 3825 src/vm.c Scm_Printf(out, " argp = %p[%d]\n", cont->argp, cont->size); out 3827 src/vm.c Scm_Printf(out, " pc = %p ", cont->pc); out 3828 src/vm.c Scm_Printf(out, "(%08x)\n", *cont->pc); out 3830 src/vm.c Scm_Printf(out, " pc = {cproc %p}\n", cont->pc); out 3832 src/vm.c Scm_Printf(out, " base = %p\n", cont->base); out 3836 src/vm.c Scm_Printf(out, "C stacks:\n"); out 3838 src/vm.c Scm_Printf(out, " %p: prev=%p, cont=%p\n", out 3842 src/vm.c Scm_Printf(out, "Escape points:\n"); out 3844 src/vm.c Scm_Printf(out, " %p: cont=%p, handler=%#20.1S\n", out 3848 src/vm.c Scm_Printf(out, "dynenv: %S\n", vm->handlers); out 3850 src/vm.c Scm_Printf(out, "Code:\n"); out 47 src/write.c static void write_object(ScmObj obj, ScmPort *out, ScmWriteContext *ctx); out 117 src/write.c static inline int outlen(ScmPort *out) out 119 src/write.c SCM_ASSERT(SCM_PORT_TYPE(out) == SCM_PORT_OSTR); out 120 src/write.c if (out->src.ostr.length < 0) { out 121 src/write.c return Scm_DStringSize(&out->src.ostr); out 123 src/write.c return out->src.ostr.length; out 182 src/write.c ScmObj out; out 187 src/write.c out = Scm_MakeOutputStringPort(TRUE); out 194 src/write.c write_ss_rec(obj, SCM_PORT(out), &ctx); out 195 src/write.c nc = outlen(SCM_PORT(out)); out 197 src/write.c ScmObj sub = Scm_Substring(SCM_STRING(Scm_GetOutputString(SCM_PORT(out))), out 202 src/write.c SCM_PUTS(Scm_GetOutputString(SCM_PORT(out)), port); /* this locks port */ out 230 src/write.c ScmObj out = Scm_MakeOutputStringPort(TRUE); out 232 src/write.c write_ss(obj, SCM_PORT(out), &ctx); out 233 src/write.c nc = outlen(SCM_PORT(out)); out 235 src/write.c ScmObj sub = Scm_Substring(SCM_STRING(Scm_GetOutputString(SCM_PORT(out))), out 240 src/write.c SCM_PUTS(Scm_GetOutputString(SCM_PORT(out)), port); /* this locks port */ out 270 src/write.c static void write_general(ScmObj obj, ScmPort *out, ScmWriteContext *ctx) out 273 src/write.c if (c->print) c->print(obj, out, ctx); out 274 src/write.c else write_object(obj, out, ctx); out 599 src/write.c static void format_pad(ScmPort *out, ScmString *str, out 611 src/write.c for (i=0; i<padcount; i++) Scm_PutcUnsafe(padchar, out); out 613 src/write.c Scm_PutsUnsafe(str, SCM_PORT(out)); out 615 src/write.c for (i=0; i<padcount; i++) Scm_PutcUnsafe(padchar, out); out 618 src/write.c Scm_PutsUnsafe(str, out); out 623 src/write.c static void format_sexp(ScmPort *out, ScmObj arg, out 655 src/write.c Scm_PutzUnsafe(s, e-s, out); out 656 src/write.c Scm_PutzUnsafe(" ...", 4, out); out 659 src/write.c Scm_PutzUnsafe(s, e-s, out); out 662 src/write.c format_pad(out, tmpstr, mincol, colinc, padchar, rightalign); out 667 src/write.c static void format_integer(ScmPort *out, ScmObj arg, out 679 src/write.c format_write(arg, out, &ictx, FALSE); out 718 src/write.c format_pad(out, SCM_STRING(str), mincol, 1, padchar, TRUE); out 721 src/write.c static void format_proc(ScmPort *out, ScmString *fmt, ScmObj args, int sharedp) out 752 src/write.c Scm_PutcUnsafe(ch, out); out 763 src/write.c Scm_PutcUnsafe('\n', out); out 768 src/write.c format_write(arg, out, &sctx, sharedp); out 770 src/write.c format_sexp(out, arg, params, numParams, atflag, out 778 src/write.c format_write(arg, out, &actx, sharedp); out 780 src/write.c format_sexp(out, arg, params, numParams, atflag, out 787 src/write.c format_write(arg, out, &actx, FALSE); out 789 src/write.c format_integer(out, arg, params, numParams, 10, out 797 src/write.c format_write(Scm_NumberToString(arg, 2, FALSE), out, out 800 src/write.c format_write(arg, out, &actx, FALSE); out 803 src/write.c format_integer(out, arg, params, numParams, 2, out 811 src/write.c format_write(Scm_NumberToString(arg, 8, FALSE), out, out 814 src/write.c format_write(arg, out, &actx, FALSE); out 817 src/write.c format_integer(out, arg, params, numParams, 8, out 826 src/write.c out, &actx, FALSE); out 828 src/write.c format_write(arg, out, &actx, FALSE); out 831 src/write.c format_integer(out, arg, params, numParams, 16, out 924 src/write.c Scm_PutcUnsafe(ch, out); out 935 src/write.c void Scm_Format(ScmPort *out, ScmString *fmt, ScmObj args, int sharedp) out 939 src/write.c if (!SCM_OPORTP(out)) { out 940 src/write.c Scm_Error("output port required, but got %S", out); out 944 src/write.c PORT_LOCK(out, vm); out 945 src/write.c PORT_SAFE_CALL(out, format_proc(SCM_PORT(out), fmt, args, sharedp)); out 946 src/write.c PORT_UNLOCK(out); out 987 src/write.c static void vprintf_proc(ScmPort *out, const char *fmt, ScmObj args, out 1000 src/write.c Scm_PutcUnsafe(c, out); out 1023 src/write.c Scm_PutzUnsafe(buf, -1, out); out 1036 src/write.c Scm_PutzUnsafe(buf, -1, out); out 1049 src/write.c Scm_PutzUnsafe(buf, -1, out); out 1058 src/write.c Scm_PutsUnsafe(SCM_STRING(val), out); out 1066 src/write.c Scm_PutcUnsafe(' ', out); out 1072 src/write.c Scm_PutcUnsafe('%', out); out 1085 src/write.c Scm_PutzUnsafe(buf, -1, out); out 1101 src/write.c int n = Scm_WriteCircular(val, SCM_OBJ(out), mode, width); out 1103 src/write.c Scm_PutzUnsafe(" ...", -1, out); out 1106 src/write.c for (; n < prec; n++) Scm_PutcUnsafe(' ', out); out 1109 src/write.c format_write(val, out, &wctx, sharedp); out 1111 src/write.c int n = Scm_WriteLimited(val, SCM_OBJ(out), mode, width); out 1113 src/write.c Scm_PutzUnsafe(" ...", -1, out); out 1116 src/write.c for (; n < prec; n++) Scm_PutcUnsafe(' ', out); out 1119 src/write.c format_write(val, out, &wctx, sharedp); out 1129 src/write.c Scm_PutcUnsafe(Scm_GetInteger(val), out); out 1159 src/write.c void Scm_Vprintf(ScmPort *out, const char *fmt, va_list ap, int sharedp) out 1166 src/write.c if (!SCM_OPORTP(out)) { out 1167 src/write.c Scm_Error("output port required, but got %S", out); out 1237 src/write.c PORT_LOCK(out, vm); out 1238 src/write.c PORT_SAFE_CALL(out, vprintf_proc(out, fmt, h, sharedp)); out 1239 src/write.c PORT_UNLOCK(out); out 1242 src/write.c void Scm_Printf(ScmPort *out, const char *fmt, ...) out 1247 src/write.c Scm_Vprintf(out, fmt, ap, FALSE); out 1251 src/write.c void Scm_PrintfShared(ScmPort *out, const char *fmt, ...) out 1255 src/write.c Scm_Vprintf(out, fmt, ap, TRUE);