info 506 ext/auxsys/auxsyslib.c struct tms info; info 508 ext/auxsys/auxsyslib.c clock_t r = times(&info); info 510 ext/auxsys/auxsyslib.c SCM_APPEND1(h, t, Scm_MakeInteger(info.tms_utime)); info 511 ext/auxsys/auxsyslib.c SCM_APPEND1(h, t, Scm_MakeInteger(info.tms_stime)); info 512 ext/auxsys/auxsyslib.c SCM_APPEND1(h, t, Scm_MakeInteger(info.tms_cutime)); info 513 ext/auxsys/auxsyslib.c SCM_APPEND1(h, t, Scm_MakeInteger(info.tms_cstime)); info 536 ext/auxsys/auxsyslib.c struct utsname info; info 538 ext/auxsys/auxsyslib.c if (uname(&info) < 0) Scm_SysError("uname failed"); info 539 ext/auxsys/auxsyslib.c SCM_APPEND1(head, tail, SCM_MAKE_STR_COPYING(info.sysname)); info 540 ext/auxsys/auxsyslib.c SCM_APPEND1(head, tail, SCM_MAKE_STR_COPYING(info.nodename)); info 541 ext/auxsys/auxsyslib.c SCM_APPEND1(head, tail, SCM_MAKE_STR_COPYING(info.release)); info 542 ext/auxsys/auxsyslib.c SCM_APPEND1(head, tail, SCM_MAKE_STR_COPYING(info.version)); info 543 ext/auxsys/auxsyslib.c SCM_APPEND1(head, tail, SCM_MAKE_STR_COPYING(info.machine)); info 90 ext/charconv/charconv.c ScmConvInfo *info = jconv_open(to, from); info 91 ext/charconv/charconv.c if (info == NULL) return FALSE; info 92 ext/charconv/charconv.c jconv_close(info); info 123 ext/charconv/charconv.c ScmConvInfo *info = (ScmConvInfo*)port->src.buf.data; info 124 ext/charconv/charconv.c return Scm_PortFileNo(info->remote); info 129 ext/charconv/charconv.c ScmConvInfo *info = (ScmConvInfo*)port->src.buf.data; info 131 ext/charconv/charconv.c return Scm_CharReady(info->remote); info 151 ext/charconv/charconv.c ScmConvInfo *info = (ScmConvInfo*)port->src.buf.data; info 154 ext/charconv/charconv.c const char *inbuf = info->buf; info 157 ext/charconv/charconv.c if (info->remoteClosed) return 0; info 162 ext/charconv/charconv.c insize = info->ptr - info->buf; info 163 ext/charconv/charconv.c nread = Scm_Getz(info->ptr, info->bufsiz - insize, info->remote); info 168 ext/charconv/charconv.c result = jconv_reset(info, outbuf, outroom); info 176 ext/charconv/charconv.c info->fromCode, info->toCode); info 178 ext/charconv/charconv.c if (info->ownerp) { info 179 ext/charconv/charconv.c Scm_ClosePort(info->remote); info 180 ext/charconv/charconv.c info->remoteClosed = TRUE; info 199 ext/charconv/charconv.c result = jconv(info, &inbuf, &inroom, &outbuf, &outroom); info 210 ext/charconv/charconv.c memmove(info->buf, info->buf+insize-inroom, inroom); info 211 ext/charconv/charconv.c info->ptr = info->buf + inroom; info 212 ext/charconv/charconv.c return info->bufsiz - outroom; info 216 ext/charconv/charconv.c ScmObj s = Scm_MakeString(info->buf+insize-inroom, cnt, cnt, info 225 ext/charconv/charconv.c memmove(info->buf, info->buf+insize-inroom, inroom); info 226 ext/charconv/charconv.c info->ptr = info->buf + inroom; info 227 ext/charconv/charconv.c return info->bufsiz - outroom; info 229 ext/charconv/charconv.c info->ptr = info->buf; info 230 ext/charconv/charconv.c return info->bufsiz - outroom; info 236 ext/charconv/charconv.c ScmConvInfo *info = (ScmConvInfo*)p->src.buf.data; info 237 ext/charconv/charconv.c jconv_close(info); info 347 ext/charconv/charconv.c ScmConvInfo *info = (ScmConvInfo*)port->src.buf.data; info 351 ext/charconv/charconv.c if (info->ptr > info->buf) { info 352 ext/charconv/charconv.c Scm_Putz(info->buf, info->ptr - info->buf, info->remote); info 353 ext/charconv/charconv.c info->ptr = info->buf; info 356 ext/charconv/charconv.c r = jconv_reset(info, info->buf, info->bufsiz); info 359 ext/charconv/charconv.c r, info->buf); info 363 ext/charconv/charconv.c info->fromCode, info->toCode); info 366 ext/charconv/charconv.c Scm_Putz(info->buf, r, info->remote); info 369 ext/charconv/charconv.c Scm_Flush(info->remote); info 370 ext/charconv/charconv.c if (info->ownerp) { info 371 ext/charconv/charconv.c Scm_ClosePort(info->remote); info 372 ext/charconv/charconv.c info->remoteClosed = TRUE; info 374 ext/charconv/charconv.c jconv_close(info); info 379 ext/charconv/charconv.c ScmConvInfo *info = (ScmConvInfo*)port->src.buf.data; info 388 ext/charconv/charconv.c outbuf = info->ptr; info 389 ext/charconv/charconv.c outsize = info->bufsiz - (info->ptr - info->buf); info 394 ext/charconv/charconv.c info->buf, info->ptr, outroom); info 396 ext/charconv/charconv.c result = jconv(info, &inbuf, &inroom, &outbuf, &outroom); info 407 ext/charconv/charconv.c info->ptr = outbuf; info 411 ext/charconv/charconv.c Scm_Putz(info->buf, outbuf - info->buf, info->remote); info 412 ext/charconv/charconv.c info->ptr = info->buf; info 418 ext/charconv/charconv.c Scm_Putz(info->buf, outbuf - info->buf, info->remote); info 419 ext/charconv/charconv.c info->ptr = info->buf; info 429 ext/charconv/charconv.c info->ptr = outbuf; info 433 ext/charconv/charconv.c Scm_Putz(info->buf, outbuf - info->buf, info->remote); info 434 ext/charconv/charconv.c info->ptr = info->buf; info 1207 ext/charconv/jconv.c static size_t jconv_ident(ScmConvInfo *info, const char **iptr, info 1212 ext/charconv/jconv.c fprintf(stderr, "jconv_ident %s->%s\n", info->fromCode, info->toCode); info 1232 ext/charconv/jconv.c static size_t jconv_1tier(ScmConvInfo *info, const char **iptr, info 1235 ext/charconv/jconv.c ScmConvProc cvt = info->convproc[0]; info 1242 ext/charconv/jconv.c fprintf(stderr, "jconv_1tier %s->%s\n", info->fromCode, info->toCode); info 1246 ext/charconv/jconv.c inchars = cvt(info, inp, inr, outp, outr, &outchars); info 1267 ext/charconv/jconv.c static size_t jconv_2tier(ScmConvInfo *info, const char **iptr, size_t *iroom, info 1271 ext/charconv/jconv.c ScmConvProc icvt = info->convproc[0]; info 1272 ext/charconv/jconv.c ScmConvProc ocvt = info->convproc[1]; info 1279 ext/charconv/jconv.c fprintf(stderr, "jconv_2tier %s->%s\n", info->fromCode, info->toCode); info 1282 ext/charconv/jconv.c inchars = icvt(info, inp, inr, buf, INTBUFSIZ, &bufchars); info 1290 ext/charconv/jconv.c bufchars = ocvt(info, buf, bufchars, outp, outr, &outchars); info 1317 ext/charconv/jconv.c static size_t jconv_iconv(ScmConvInfo *info, const char **iptr, size_t *iroom, info 1322 ext/charconv/jconv.c fprintf(stderr, "jconv_iconv %s->%s\n", info->fromCode, info->toCode); info 1324 ext/charconv/jconv.c r = iconv(info->handle, (char **)iptr, iroom, optr, oroom); info 1325 ext/charconv/jconv.c info->ostate = JIS_UNKNOWN; info 1336 ext/charconv/jconv.c static size_t jconv_iconv_reset(ScmConvInfo *info, char *optr, size_t oroom) info 1340 ext/charconv/jconv.c if (info->ostate == JIS_ASCII) return 0; info 1341 ext/charconv/jconv.c r = iconv(info->handle, NULL, 0, &optr, &oroom); info 1346 ext/charconv/jconv.c info->ostate = JIS_ASCII; info 1358 ext/charconv/jconv.c ScmConvInfo *info; info 1408 ext/charconv/jconv.c info = SCM_NEW(ScmConvInfo); info 1409 ext/charconv/jconv.c info->jconv = handler; info 1410 ext/charconv/jconv.c info->convproc[0] = convproc[0]; info 1411 ext/charconv/jconv.c info->convproc[1] = convproc[1]; info 1412 ext/charconv/jconv.c info->reset = reset; info 1413 ext/charconv/jconv.c info->handle = handle; info 1414 ext/charconv/jconv.c info->toCode = toCode; info 1415 ext/charconv/jconv.c info->istate = info->ostate = JIS_ASCII; info 1416 ext/charconv/jconv.c info->fromCode = fromCode; info 1417 ext/charconv/jconv.c return info; info 1423 ext/charconv/jconv.c int jconv_close(ScmConvInfo *info) info 1427 ext/charconv/jconv.c if (info->handle != (iconv_t)-1) { info 1428 ext/charconv/jconv.c r = iconv_close(info->handle); info 1429 ext/charconv/jconv.c info->handle = (iconv_t)-1; info 1438 ext/charconv/jconv.c size_t jconv(ScmConvInfo *info, info 1442 ext/charconv/jconv.c SCM_ASSERT(info->jconv != NULL); info 1443 ext/charconv/jconv.c return info->jconv(info, inptr, inroom, outptr, outroom); info 1449 ext/charconv/jconv.c size_t jconv_reset(ScmConvInfo *info, char *outptr, size_t outroom) info 1451 ext/charconv/jconv.c if (info->reset) { info 1452 ext/charconv/jconv.c return info->reset(info, outptr, outroom); info 33 ext/dbm/bsddb.h void *info; info 485 ext/net/netdb.c ScmSysAddrinfo *info = SCM_ALLOCATE(ScmSysAddrinfo, klass); info 486 ext/net/netdb.c SCM_SET_CLASS(info, klass); info 487 ext/net/netdb.c info->canonname = NULL; info 488 ext/net/netdb.c info->addr = NULL; info 489 ext/net/netdb.c return SCM_OBJ(info); info 494 ext/net/netdb.c ScmSysAddrinfo *info = SCM_NEW(ScmSysAddrinfo); info 496 ext/net/netdb.c SCM_SET_CLASS(info, SCM_CLASS_SYS_ADDRINFO); info 497 ext/net/netdb.c info->flags = ai->ai_flags; info 498 ext/net/netdb.c info->family = ai->ai_family; info 499 ext/net/netdb.c info->socktype = ai->ai_socktype; info 500 ext/net/netdb.c info->protocol = ai->ai_protocol; info 501 ext/net/netdb.c info->addrlen = ai->ai_addrlen; info 503 ext/net/netdb.c info->canonname = SCM_STRING(SCM_MAKE_STR_COPYING(ai->ai_canonname)); info 505 ext/net/netdb.c info->addr = SCM_SOCKADDR(Scm_MakeSockAddr(NULL, info 508 ext/net/netdb.c return info; info 169 gc/darwin_stop_world.c ppc_thread_state_t info; info 171 gc/darwin_stop_world.c ppc_thread_state64_t info; info 175 gc/darwin_stop_world.c (natural_t *)&info, &outCount); info 178 gc/darwin_stop_world.c lo = (void*)(info.r1 - PPC_RED_ZONE_SIZE); info 179 gc/darwin_stop_world.c hi = (ptr_t)FindTopOfStack(info.r1); info 181 gc/darwin_stop_world.c GC_push_one(info.r0); info 182 gc/darwin_stop_world.c GC_push_one(info.r2); info 183 gc/darwin_stop_world.c GC_push_one(info.r3); info 184 gc/darwin_stop_world.c GC_push_one(info.r4); info 185 gc/darwin_stop_world.c GC_push_one(info.r5); info 186 gc/darwin_stop_world.c GC_push_one(info.r6); info 187 gc/darwin_stop_world.c GC_push_one(info.r7); info 188 gc/darwin_stop_world.c GC_push_one(info.r8); info 189 gc/darwin_stop_world.c GC_push_one(info.r9); info 190 gc/darwin_stop_world.c GC_push_one(info.r10); info 191 gc/darwin_stop_world.c GC_push_one(info.r11); info 192 gc/darwin_stop_world.c GC_push_one(info.r12); info 193 gc/darwin_stop_world.c GC_push_one(info.r13); info 194 gc/darwin_stop_world.c GC_push_one(info.r14); info 195 gc/darwin_stop_world.c GC_push_one(info.r15); info 196 gc/darwin_stop_world.c GC_push_one(info.r16); info 197 gc/darwin_stop_world.c GC_push_one(info.r17); info 198 gc/darwin_stop_world.c GC_push_one(info.r18); info 199 gc/darwin_stop_world.c GC_push_one(info.r19); info 200 gc/darwin_stop_world.c GC_push_one(info.r20); info 201 gc/darwin_stop_world.c GC_push_one(info.r21); info 202 gc/darwin_stop_world.c GC_push_one(info.r22); info 203 gc/darwin_stop_world.c GC_push_one(info.r23); info 204 gc/darwin_stop_world.c GC_push_one(info.r24); info 205 gc/darwin_stop_world.c GC_push_one(info.r25); info 206 gc/darwin_stop_world.c GC_push_one(info.r26); info 207 gc/darwin_stop_world.c GC_push_one(info.r27); info 208 gc/darwin_stop_world.c GC_push_one(info.r28); info 209 gc/darwin_stop_world.c GC_push_one(info.r29); info 210 gc/darwin_stop_world.c GC_push_one(info.r30); info 211 gc/darwin_stop_world.c GC_push_one(info.r31); info 215 gc/darwin_stop_world.c i386_thread_state_t info; info 218 gc/darwin_stop_world.c (natural_t *)&info, &outCount); info 221 gc/darwin_stop_world.c lo = (void*)info.esp; info 222 gc/darwin_stop_world.c hi = (ptr_t)FindTopOfStack(info.esp); info 224 gc/darwin_stop_world.c GC_push_one(info.eax); info 225 gc/darwin_stop_world.c GC_push_one(info.ebx); info 226 gc/darwin_stop_world.c GC_push_one(info.ecx); info 227 gc/darwin_stop_world.c GC_push_one(info.edx); info 228 gc/darwin_stop_world.c GC_push_one(info.edi); info 229 gc/darwin_stop_world.c GC_push_one(info.esi); info 232 gc/darwin_stop_world.c GC_push_one(info.ss); info 233 gc/darwin_stop_world.c GC_push_one(info.eip); info 234 gc/darwin_stop_world.c GC_push_one(info.cs); info 235 gc/darwin_stop_world.c GC_push_one(info.ds); info 236 gc/darwin_stop_world.c GC_push_one(info.es); info 237 gc/darwin_stop_world.c GC_push_one(info.fs); info 238 gc/darwin_stop_world.c GC_push_one(info.gs); info 303 gc/darwin_stop_world.c struct thread_basic_info info; info 306 gc/darwin_stop_world.c (thread_info_t)&info, &outCount); info 318 gc/darwin_stop_world.c GC_printf2("Thread state for 0x%lx = %d\n", thread, info.run_state); info 321 gc/darwin_stop_world.c GC_mach_threads[GC_mach_threads_count].already_suspended = info.suspend_count; info 323 gc/darwin_stop_world.c if (info.suspend_count) continue; info 421 gc/darwin_stop_world.c struct thread_basic_info info; info 450 gc/darwin_stop_world.c (thread_info_t)&info, &outCount); info 454 gc/darwin_stop_world.c info.run_state); info 393 gc/dyn_load.c static int GC_register_dynlib_callback(info, size, ptr) info 394 gc/dyn_load.c struct dl_phdr_info * info; info 404 gc/dyn_load.c + sizeof (info->dlpi_phnum)) info 407 gc/dyn_load.c p = info->dlpi_phdr; info 408 gc/dyn_load.c for( i = 0; i < (int)(info->dlpi_phnum); ((i++),(p++)) ) { info 413 gc/dyn_load.c start = ((char *)(p->p_vaddr)) + info->dlpi_addr; info 266 gc/include/private/gc_priv.h void GC_save_callers GC_PROTO((struct callinfo info[NFRAMES])); info 268 gc/include/private/gc_priv.h void GC_print_callers GC_PROTO((struct callinfo info[NFRAMES])); info 1965 gc/os_dep.c struct PCR_ThCtl_TInfoRep info; info 1968 gc/os_dep.c info.ti_stkLow = info.ti_stkHi = 0; info 1969 gc/os_dep.c result = PCR_ThCtl_GetInfo(t, &info); info 1970 gc/os_dep.c GC_push_all_stack((ptr_t)(info.ti_stkLow), (ptr_t)(info.ti_stkHi)); info 4016 gc/os_dep.c void GC_save_callers (info) info 4017 gc/os_dep.c struct callinfo info[NFRAMES]; info 4027 gc/os_dep.c info[0].ci_pc = (word)(&GC_save_callers); info 4028 gc/os_dep.c for (i = 1; i < NFRAMES; ++i) info[i].ci_pc = 0; info 4035 gc/os_dep.c BCOPY(tmp_info+IGNORE_FRAMES, info, (npcs - IGNORE_FRAMES) * sizeof(void *)); info 4036 gc/os_dep.c for (i = npcs - IGNORE_FRAMES; i < NFRAMES; ++i) info[i].ci_pc = 0; info 4058 gc/os_dep.c void GC_save_callers (info) info 4059 gc/os_dep.c struct callinfo info[NFRAMES]; info 4078 gc/os_dep.c info[nframes].ci_pc = fp->FR_SAVPC; info 4081 gc/os_dep.c info[nframes].ci_arg[i] = ~(fp->fr_arg[i]); info 4085 gc/os_dep.c if (nframes < NFRAMES) info[nframes].ci_pc = 0; info 4095 gc/os_dep.c void GC_print_callers (info) info 4096 gc/os_dep.c struct callinfo info[NFRAMES]; info 4114 gc/os_dep.c if (info[i].ci_pc == 0) break; info 4122 gc/os_dep.c GC_err_printf2("%d (0x%X)", ~(info[i].ci_arg[j]), info 4123 gc/os_dep.c ~(info[i].ci_arg[j])); info 4131 gc/os_dep.c GC_err_printf1("\t\t##PC##= 0x%lx\n", info[i].ci_pc); info 4141 gc/os_dep.c backtrace_symbols((void **)(&(info[i].ci_pc)), 1); info 4146 gc/os_dep.c sprintf(buf, "##PC##= 0x%lx", info[i].ci_pc); info 4181 gc/os_dep.c (unsigned long)info[i].ci_pc); info 4224 gc/os_dep.c (unsigned long)info[i].ci_pc); info 320 gc/win32_threads.c MEMORY_BASIC_INFORMATION info; info 321 gc/win32_threads.c VirtualQuery(s, &info, sizeof(info)); info 323 gc/win32_threads.c bottom = info.BaseAddress; info 324 gc/win32_threads.c VirtualQuery(bottom - 1, &info, sizeof(info)); info 325 gc/win32_threads.c } while ((info.Protect & PAGE_READWRITE) info 326 gc/win32_threads.c && !(info.Protect & PAGE_GUARD)); info 1923 src/class.c SCM_GENERIC(obj)->common.info, info 1932 src/class.c return gf->common.info; info 1937 src/class.c gf->common.info = val; info 1956 src/class.c gf->common.info = name; info 2151 src/class.c Scm_Printf(port, "#<method %S>", SCM_METHOD(obj)->common.info); info 2195 src/class.c m->common.info = Scm_Cons(g->common.info, info 2463 src/class.c Scm_Printf(port, "#<accessor-method %S>", SCM_METHOD(obj)->common.info); info 2926 src/class.c gf->common.info = s; info 2936 src/class.c m->common.info = Scm_Cons(m->generic->common.info, info 85 src/code.c cc->info = SCM_NIL; info 143 src/code.c ScmObj info, s; info 148 src/code.c info = Scm_Assq(SCM_MAKE_INT(i), cc->info); info 205 src/code.c if (!SCM_PAIRP(info)) { info 210 src/code.c ScmObj srcinfo = Scm_Assq(SCM_SYM_SOURCE_INFO, info); info 211 src/code.c ScmObj bindinfo = Scm_Assq(SCM_SYM_BIND_INFO, info); info 266 src/code.c ScmObj info; /* alist of (offset (source-info obj)) */ info 294 src/code.c b->info = SCM_NIL; info 321 src/code.c b->info = Scm_Acons(SCM_MAKE_INT(b->currentIndex), info 324 src/code.c b->info); info 538 src/code.c cc->info = b->info; info 601 src/code.c b->currentInfo = (info); \ info 607 src/code.c if (!SCM_FALSEP(info)) b->currentInfo = info; \ info 614 src/code.c if (!SCM_FALSEP(info)) b->currentInfo = info; \ info 626 src/code.c ScmObj info) /* debug info */ info 924 src/code.c return SCM_COMPILED_CODE(cc)->info; info 1014 src/code.c struct insn_info *info; info 1022 src/code.c info = insn_table; info 2217 src/gauche.h ScmObj info; /* source code info */ info 2236 src/gauche.h #define SCM_PROCEDURE_INFO(obj) SCM_PROCEDURE(obj)->info info 2256 src/gauche.h SCM_PROCEDURE(obj)->info = inf, \ info 2299 src/gauche.h ScmObj info); info 63 src/gauche/code.h ScmObj info; /* debug info. alist of instruction offset info 102 src/gauche/code.h #define SCM_COMPILED_CODE_CONST_INITIALIZER(code, codesize, maxstack, reqargs, optargs, name, info, arginfo, parent, iform) \ info 105 src/gauche/code.h (reqargs), (optargs), (name), (info), (arginfo), \ info 121 src/gauche/code.h ScmObj info); info 126 src/gauche/code.h ScmObj info); info 136 src/gauche/code.h ScmObj info); info 83 src/gauche/vm.h ScmObj info; /* reserved */ info 795 src/intlib.c ScmObj info; info 804 src/intlib.c info = (info_scm); info 806 src/intlib.c Scm_CompiledCodeEmit(cc, code, 0, 0, SCM_FALSE, info); info 823 src/intlib.c ScmObj info; info 834 src/intlib.c info = (info_scm); info 836 src/intlib.c Scm_CompiledCodeEmit(cc, code, 0, 0, operand, info); info 911 src/intlib.c ScmObj info; info 923 src/intlib.c info = (info_scm); info 925 src/intlib.c Scm_CompiledCodeEmit(cc, code, arg0, 0, SCM_FALSE, info); info 944 src/intlib.c ScmObj info; info 958 src/intlib.c info = (info_scm); info 960 src/intlib.c Scm_CompiledCodeEmit(cc, code, arg0, 0, operand, info); info 1047 src/intlib.c ScmObj info; info 1062 src/intlib.c info = (info_scm); info 1064 src/intlib.c Scm_CompiledCodeEmit(cc, code, arg0, arg1, SCM_FALSE, info); info 1085 src/intlib.c ScmObj info; info 1102 src/intlib.c info = (info_scm); info 1104 src/intlib.c Scm_CompiledCodeEmit(cc, code, arg0, arg1, operand, info); info 51 src/proc.c ScmObj info = SCM_PROCEDURE_INFO(obj); info 54 src/proc.c if (!SCM_FALSEP(info)) { info 55 src/proc.c Scm_Printf(port, " %A", info); info 59 src/proc.c Scm_Printf(port, "#<closure %S>", info); info 71 src/proc.c ScmObj info; info 74 src/proc.c info = Scm_CompiledCodeFullName(SCM_COMPILED_CODE(code)); info 79 src/proc.c SCM_PROCEDURE_INIT(c, req, opt, SCM_PROC_CLOSURE, info); info 94 src/proc.c ScmObj info) info 98 src/proc.c SCM_PROCEDURE_INIT(s, required, optional, SCM_PROC_SUBR, info); info 367 src/proc.c return p->info; info 573 src/vm.c e__->info = info_; \ info 2530 src/vm.c e->info = SCM_FALSE; info 3672 src/vm.c ScmObj info; info 3674 src/vm.c info = Scm_VMGetSourceInfo(vm->base, vm->pc); info 3675 src/vm.c if (!SCM_FALSEP(info)) SCM_APPEND1(stack, tail, info); info 3677 src/vm.c info = Scm_VMGetSourceInfo(c->base, c->pc); info 3678 src/vm.c if (!SCM_FALSEP(info)) SCM_APPEND1(stack, tail, info); info 3724 src/vm.c ScmObj info, evec; info 3729 src/vm.c info = Scm_VMGetSourceInfo(vm->pc); info 3730 src/vm.c SCM_APPEND1(stack, tail, Scm_Cons(info, env2vec(vm->env, &envTab))); info 3734 src/vm.c if (!SCM_PAIRP(c->info)) continue; info 3735 src/vm.c info = Scm_VMGetSourceInfo(c->info); info 3737 src/vm.c SCM_APPEND1(stack, tail, Scm_Cons(info, evec)); info 3756 src/vm.c SCM_FOR_EACH(ip, base->info) { info 3769 src/vm.c ScmObj info = get_debug_info(base, pc); info 3770 src/vm.c if (SCM_PAIRP(info)) { info 3771 src/vm.c ScmObj p = Scm_Assq(SCM_SYM_SOURCE_INFO, info); info 3779 src/vm.c ScmObj info = get_debug_info(base, pc); info 3780 src/vm.c if (SCM_PAIRP(info)) { info 3781 src/vm.c ScmObj p = Scm_Assq(SCM_SYM_BIND_INFO, info); info 3790 src/vm.c Scm_Printf(out, " %p %55.1S\n", env, env->info);