data 48 ext/charconv/charconv.c void *data; data 103 ext/charconv/charconv.c rec->data = data; data 123 ext/charconv/charconv.c ScmConvInfo *info = (ScmConvInfo*)port->src.buf.data; data 129 ext/charconv/charconv.c ScmConvInfo *info = (ScmConvInfo*)port->src.buf.data; data 151 ext/charconv/charconv.c ScmConvInfo *info = (ScmConvInfo*)port->src.buf.data; data 236 ext/charconv/charconv.c ScmConvInfo *info = (ScmConvInfo*)p->src.buf.data; data 273 ext/charconv/charconv.c guessed = guess->proc(inbuf, preread, guess->data); data 305 ext/charconv/charconv.c bufrec.data = (void*)cinfo; data 347 ext/charconv/charconv.c ScmConvInfo *info = (ScmConvInfo*)port->src.buf.data; data 379 ext/charconv/charconv.c ScmConvInfo *info = (ScmConvInfo*)port->src.buf.data; data 480 ext/charconv/charconv.c bufrec.data = (void*)cinfo; data 494 ext/charconv/charconv.c return guess->proc(buf, buflen, guess->data); data 54 ext/digest/md5.c ScmObj data; data 60 ext/digest/md5.c data = (data_scm); data 63 ext/digest/md5.c if (SCM_U8VECTORP(data)){ data 64 ext/digest/md5.c MD5Update(&md5->ctx, SCM_UVECTOR_ELEMENTS(SCM_U8VECTOR(data)), SCM_U8VECTOR_SIZE(SCM_U8VECTOR(data))); data 65 ext/digest/md5.c } else if (SCM_STRINGP(data)) { data 66 ext/digest/md5.c const ScmStringBody *b = SCM_STRING_BODY(data); data 71 ext/digest/md5.c Scm_Error("u8vector or string required, but got: %S", data); data 155 ext/digest/md5c.c ( w += f(x, y, z) + data, w = w<<s | w>>(32-s), w += x ) data 136 ext/digest/sha.c ( e += ROTL(5,a) + f(b, c, d) + k + data, b = ROTL(30, b) ) data 54 ext/digest/sha1.c ScmObj data; data 60 ext/digest/sha1.c data = (data_scm); data 63 ext/digest/sha1.c if (SCM_U8VECTORP(data)) { data 64 ext/digest/sha1.c SHAUpdate(&sha1->ctx, (const unsigned char*)SCM_UVECTOR_ELEMENTS(SCM_U8VECTOR(data)), SCM_U8VECTOR_SIZE(SCM_U8VECTOR(data))); data 65 ext/digest/sha1.c } else if (SCM_STRINGP(data)) { data 66 ext/digest/sha1.c const ScmStringBody *b = SCM_STRING_BODY(data); data 71 ext/digest/sha1.c Scm_Error("u8vector or string required, but got: %S", data); data 219 ext/threads/mutex.c SCM_THREAD_EXCEPTION(exc)->data = SCM_OBJ(mutex); data 94 ext/threads/threads.c ScmVM *vm = SCM_VM(data); data 106 ext/threads/threads.c SCM_THREAD_EXCEPTION(exc)->data = SCM_OBJ(vm->canceller); data 115 ext/threads/threads.c ScmVM *vm = SCM_VM(data); data 136 ext/threads/threads.c SCM_THREAD_EXCEPTION(exc)->data = SCM_OBJ(vm->escapeData[1]); data 626 ext/threads/thrlib.c e->data = SCM_UNDEFINED; data 633 ext/threads/thrlib.c if (SCM_UNDEFINEDP(exc->data)) { data 636 ext/threads/thrlib.c Scm_Printf(port, "#<%A %S %S>", Scm__InternalClassName(k), SCM_OBJ_SAFE(exc->thread), exc->data); data 642 ext/threads/thrlib.c Scm_Printf(port, "#<uncaught-exception in thread %S: %S>", SCM_OBJ_SAFE(exc->thread), exc->data); data 647 ext/threads/thrlib.c Scm_Printf(port, "#<terminated-thread-exception: %S terminated by %S>", SCM_OBJ_SAFE(exc->thread), exc->data); data 687 ext/threads/thrlib.c return SCM_OBJ_SAFE(obj->data); data 693 ext/threads/thrlib.c obj->data = (value); data 706 ext/threads/thrlib.c return SCM_OBJ_SAFE(obj->data); data 712 ext/threads/thrlib.c obj->data = (value); data 725 ext/threads/thrlib.c return SCM_OBJ_SAFE(obj->data); data 731 ext/threads/thrlib.c obj->data = (value); data 86 ext/vport/vport.c vport *data = (vport*)p->src.vt.data; data 87 ext/vport/vport.c SCM_ASSERT(data != NULL); data 89 ext/vport/vport.c if (SCM_FALSEP(data->getb_proc)) { data 97 ext/vport/vport.c if (SCM_FALSEP(data->getc_proc)) return EOF; data 98 ext/vport/vport.c ch = Scm_Apply(data->getc_proc, SCM_NIL); data 113 ext/vport/vport.c ScmObj b = Scm_Apply(data->getb_proc, SCM_NIL); data 124 ext/vport/vport.c vport *data = (vport*)p->src.vt.data; data 125 ext/vport/vport.c SCM_ASSERT(data != NULL); data 127 ext/vport/vport.c if (SCM_FALSEP(data->getc_proc)) { data 134 ext/vport/vport.c if (SCM_FALSEP(data->getb_proc)) return EOF; data 135 ext/vport/vport.c b = Scm_Apply(data->getb_proc, SCM_NIL); data 140 ext/vport/vport.c b = Scm_Apply(data->getb_proc, SCM_NIL); data 150 ext/vport/vport.c ScmObj ch = Scm_Apply(data->getc_proc, SCM_NIL); data 161 ext/vport/vport.c vport *data = (vport*)p->src.vt.data; data 162 ext/vport/vport.c SCM_ASSERT(data != NULL); data 164 ext/vport/vport.c if (!SCM_FALSEP(data->gets_proc)) { data 167 ext/vport/vport.c ScmObj s = Scm_Apply(data->gets_proc, SCM_LIST1(SCM_MAKE_INT(buflen))); data 195 ext/vport/vport.c vport *data = (vport*)p->src.vt.data; data 196 ext/vport/vport.c SCM_ASSERT(data != NULL); data 198 ext/vport/vport.c if (!SCM_FALSEP(data->ready_proc)) { data 199 ext/vport/vport.c ScmObj s = Scm_Apply(data->ready_proc, data 213 ext/vport/vport.c vport *data = (vport*)p->src.vt.data; data 214 ext/vport/vport.c SCM_ASSERT(data != NULL); data 216 ext/vport/vport.c if (SCM_FALSEP(data->putb_proc)) { data 217 ext/vport/vport.c if (!SCM_FALSEP(data->putc_proc) data 220 ext/vport/vport.c Scm_Apply(data->putc_proc, SCM_LIST1(SCM_MAKE_CHAR(b))); data 228 ext/vport/vport.c Scm_Apply(data->putb_proc, SCM_LIST1(SCM_MAKE_INT(b))); data 237 ext/vport/vport.c vport *data = (vport*)p->src.vt.data; data 238 ext/vport/vport.c SCM_ASSERT(data != NULL); data 240 ext/vport/vport.c if (SCM_FALSEP(data->putc_proc)) { data 241 ext/vport/vport.c if (SCM_FALSEP(data->putb_proc)) { data 249 ext/vport/vport.c Scm_Apply(data->putb_proc, SCM_LIST1(SCM_MAKE_INT(buf[i]))); data 253 ext/vport/vport.c Scm_Apply(data->putc_proc, SCM_LIST1(SCM_MAKE_CHAR(c))); data 262 ext/vport/vport.c vport *data = (vport*)p->src.vt.data; data 263 ext/vport/vport.c SCM_ASSERT(data != NULL); data 265 ext/vport/vport.c if (!SCM_FALSEP(data->puts_proc)) { data 266 ext/vport/vport.c Scm_Apply(data->puts_proc, data 269 ext/vport/vport.c } else if (!SCM_FALSEP(data->putb_proc)) { data 273 ext/vport/vport.c Scm_Apply(data->putb_proc, SCM_LIST1(SCM_MAKE_INT(b))); data 286 ext/vport/vport.c vport *data = (vport*)p->src.vt.data; data 288 ext/vport/vport.c SCM_ASSERT(data != NULL); data 290 ext/vport/vport.c if (!SCM_FALSEP(data->puts_proc)) { data 291 ext/vport/vport.c Scm_Apply(data->puts_proc, SCM_LIST1(SCM_OBJ(s))); data 293 ext/vport/vport.c || (SCM_FALSEP(data->putc_proc) data 294 ext/vport/vport.c && !SCM_FALSEP(data->putb_proc))) { data 297 ext/vport/vport.c } else if (!SCM_FALSEP(data->putc_proc)) { data 304 ext/vport/vport.c Scm_Apply(data->putc_proc, SCM_LIST1(SCM_MAKE_CHAR(c))); data 317 ext/vport/vport.c vport *data = (vport*)p->src.vt.data; data 318 ext/vport/vport.c SCM_ASSERT(data != NULL); data 319 ext/vport/vport.c if (!SCM_FALSEP(data->flush_proc)) { data 320 ext/vport/vport.c Scm_Apply(data->flush_proc, SCM_NIL); data 329 ext/vport/vport.c vport *data = (vport*)p->src.vt.data; data 330 ext/vport/vport.c SCM_ASSERT(data != NULL); data 331 ext/vport/vport.c if (!SCM_FALSEP(data->close_proc)) { data 332 ext/vport/vport.c Scm_Apply(data->close_proc, SCM_NIL); data 341 ext/vport/vport.c vport *data = (vport*)p->src.vt.data; data 342 ext/vport/vport.c SCM_ASSERT(data != NULL); data 343 ext/vport/vport.c if (!SCM_FALSEP(data->seek_proc)) { data 344 ext/vport/vport.c ScmObj r = Scm_Apply(data->seek_proc, data 361 ext/vport/vport.c vport *data = SCM_NEW(vport); data 365 ext/vport/vport.c data->getb_proc = SCM_FALSE; data 366 ext/vport/vport.c data->getc_proc = SCM_FALSE; data 367 ext/vport/vport.c data->gets_proc = SCM_FALSE; data 368 ext/vport/vport.c data->ready_proc = SCM_FALSE; data 369 ext/vport/vport.c data->putb_proc = SCM_FALSE; data 370 ext/vport/vport.c data->putc_proc = SCM_FALSE; data 371 ext/vport/vport.c data->puts_proc = SCM_FALSE; data 372 ext/vport/vport.c data->flush_proc = SCM_FALSE; data 373 ext/vport/vport.c data->close_proc = SCM_FALSE; data 374 ext/vport/vport.c data->seek_proc = SCM_FALSE; data 396 ext/vport/vport.c SCM_PORT(port)->src.vt.data = data; data 413 ext/vport/vport.c vport *data = (vport*)SCM_PORT(p)->src.vt.data; \ data 414 ext/vport/vport.c SCM_ASSERT(data != NULL); \ data 415 ext/vport/vport.c return data->SCM_CPP_CAT(name,_proc); \ data 419 ext/vport/vport.c vport *data = (vport*)SCM_PORT(p)->src.vt.data; \ data 420 ext/vport/vport.c SCM_ASSERT(data != NULL); \ data 421 ext/vport/vport.c data->SCM_CPP_CAT(name,_proc) = v; \ data 510 ext/vport/vport.c bport *data = (bport*)p->src.buf.data; data 512 ext/vport/vport.c SCM_ASSERT(data != NULL); data 513 ext/vport/vport.c if (SCM_FALSEP(data->fill_proc)) { data 518 ext/vport/vport.c r = Scm_Apply(data->fill_proc, SCM_LIST1(vec)); data 529 ext/vport/vport.c bport *data = (bport*)p->src.buf.data; data 531 ext/vport/vport.c SCM_ASSERT(data != NULL); data 532 ext/vport/vport.c if (SCM_FALSEP(data->flush_proc)) { data 537 ext/vport/vport.c r = Scm_Apply(data->flush_proc, SCM_LIST2(vec, SCM_MAKE_BOOL(forcep))); data 548 ext/vport/vport.c bport *data = (bport*)p->src.buf.data; data 549 ext/vport/vport.c SCM_ASSERT(data != NULL); data 550 ext/vport/vport.c if (!SCM_FALSEP(data->close_proc)) { data 551 ext/vport/vport.c Scm_Apply(data->close_proc, SCM_NIL); data 560 ext/vport/vport.c bport *data = (bport*)p->src.buf.data; data 561 ext/vport/vport.c SCM_ASSERT(data != NULL); data 563 ext/vport/vport.c if (!SCM_FALSEP(data->ready_proc)) { data 564 ext/vport/vport.c ScmObj s = Scm_Apply(data->ready_proc, SCM_NIL); data 577 ext/vport/vport.c bport *data = (bport*)p->src.buf.data; data 578 ext/vport/vport.c SCM_ASSERT(data != NULL); data 580 ext/vport/vport.c if (SCM_FALSEP(data->filenum_proc)) { data 583 ext/vport/vport.c ScmObj s = Scm_Apply(data->filenum_proc, SCM_NIL); data 594 ext/vport/vport.c bport *data = (bport*)p->src.buf.data; data 595 ext/vport/vport.c SCM_ASSERT(data != NULL); data 596 ext/vport/vport.c if (!SCM_FALSEP(data->seek_proc)) { data 597 ext/vport/vport.c ScmObj r = Scm_Apply(data->seek_proc, data 614 ext/vport/vport.c bport *data = SCM_NEW(bport); data 620 ext/vport/vport.c data->fill_proc = SCM_FALSE; data 621 ext/vport/vport.c data->flush_proc = SCM_FALSE; data 622 ext/vport/vport.c data->close_proc = SCM_FALSE; data 623 ext/vport/vport.c data->ready_proc = SCM_FALSE; data 624 ext/vport/vport.c data->filenum_proc = SCM_FALSE; data 625 ext/vport/vport.c data->seek_proc = SCM_FALSE; data 644 ext/vport/vport.c buf.data = data; data 661 ext/vport/vport.c bport *data = (bport*)SCM_PORT(p)->src.buf.data; \ data 662 ext/vport/vport.c SCM_ASSERT(data != NULL); \ data 663 ext/vport/vport.c return data->SCM_CPP_CAT(name,_proc); \ data 667 ext/vport/vport.c bport *data = (bport*)SCM_PORT(p)->src.buf.data; \ data 668 ext/vport/vport.c SCM_ASSERT(data != NULL); \ data 669 ext/vport/vport.c data->SCM_CPP_CAT(name,_proc) = v; \ data 101 gc/AmigaOS.c ULONG *data; data 140 gc/AmigaOS.c for (data = (ULONG *)BADDR(myseglist); data != NULL; data 141 gc/AmigaOS.c data = (ULONG *)BADDR(data[0])) { data 142 gc/AmigaOS.c if (((ULONG) GC_register_data_segments < (ULONG) &data[1]) || data 143 gc/AmigaOS.c ((ULONG) GC_register_data_segments > (ULONG) &data[1] + data[-1])) { data 145 gc/AmigaOS.c if (dataSegSize == data[-1]) { data 149 gc/AmigaOS.c GC_add_roots_inner((char *)&data[1], data 150 gc/AmigaOS.c ((char *)&data[1]) + data[-1], FALSE); data 168 gc/AmigaOS.c ULONG *data; data 190 gc/AmigaOS.c for (data = (ULONG *)BADDR(myseglist); data != 0; data 191 gc/AmigaOS.c data = (ULONG *)BADDR(data[0])) { data 193 gc/AmigaOS.c if (((ULONG) GC_register_data_segments < (ULONG) &data[1]) || data 194 gc/AmigaOS.c ((ULONG) GC_register_data_segments > (ULONG) &data[1] + data[-1])) { data 198 gc/AmigaOS.c GC_add_roots_inner((char *)&data[1], data 199 gc/AmigaOS.c ((char *)&data[1]) + data[-1], FALSE); data 56 gc/MacOS.c char data[]; data 74 gc/MacOS.c tempPtr = (**tempMemBlock).data; data 486 gc/cord/cordxtra.c char data[LINE_SZ]; data 523 gc/cord/cordxtra.c if (fread(new_cache -> data, sizeof(char), LINE_SZ, f) data 531 gc/cord/cordxtra.c return(new_cache->data[MOD_LINE_SZ(file_pos)]); data 552 gc/cord/cordxtra.c return(cl -> data[MOD_LINE_SZ(i)]); data 1029 gc/dbg_mlc.c result -> cl_data = data; data 1041 gc/dbg_mlc.c register struct closure * cl = (struct closure *) data; data 62 gc/dyn_load.c --> We only know how to find data segments of dynamic libraries for the data 3519 gc/os_dep.c char data[256]; data 3524 gc/os_dep.c char data[1024]; data 3757 gc/os_dep.c r = exception_raise(port,thread,task,exception,data,data_count); data 3760 gc/os_dep.c r = exception_raise_state(port,thread,task,exception,data, data 3765 gc/os_dep.c r = exception_raise_state_identity(port,thread,task,exception,data, data 62 gc/pcr_interface.c PCR_ERes (*ed_proc)(void *p, size_t size, PCR_Any data); data 105 gc/pcr_interface.c ed.ed_client_data = data; data 111 gc/pcr_interface.c return((*(GC_old_allocator->mmp_enumerate))(ptrFree, proc, data)); data 122 gc/tests/test_cpp.cc my_assert( self->i == (int) (long) data );} data 390 src/class.c instance->data = NULL; /* see the above note on the 'data' member */ data 502 src/class.c return Scm_VMIsA(SCM_OBJ(data[0]), SCM_CLASS(data[1])); data 509 src/class.c void *data[2]; data 510 src/class.c data[0] = obj; data 511 src/class.c data[1] = klass; data 512 src/class.c Scm_VMPushCC(is_a_cc, data, 2); data 1184 src/class.c ScmObj obj = data[0]; data 1185 src/class.c ScmSlotAccessor *sa = SCM_SLOT_ACCESSOR(data[1]); data 1206 src/class.c void *data[2]; data 1207 src/class.c data[0] = (void*)obj; data 1208 src/class.c data[1] = (void*)sa; data 1209 src/class.c Scm_VMPushCC(slot_initialize_cc, data, 2); data 1256 src/class.c ScmObj obj = data[0]; data 1257 src/class.c ScmObj slot = data[1]; data 1258 src/class.c int boundp = (data[2] != NULL); data 1288 src/class.c void *data[3]; data 1289 src/class.c data[0] = obj; data 1290 src/class.c data[1] = sa->name; data 1291 src/class.c data[2] = (void*)(long)boundp; data 1292 src/class.c Scm_VMPushCC(slot_boundp_using_accessor_cc, data, 3); data 1295 src/class.c void *data[3]; data 1296 src/class.c data[0] = obj; data 1297 src/class.c data[1] = sa->name; data 1298 src/class.c data[2] = (void*)(long)boundp; data 1299 src/class.c Scm_VMPushCC(slot_ref_using_accessor_cc, data, 3); data 1327 src/class.c return Scm_VMSlotRef(SCM_OBJ(data[0]), SCM_OBJ(data[1]), (int)data[2]); data 1334 src/class.c void *data[3]; data 1337 src/class.c data[0] = obj; data 1338 src/class.c data[1] = slot; data 1339 src/class.c data[2] = (void*)boundp; data 1340 src/class.c Scm_VMPushCC(slot_ref_cc, data, 3); data 1360 src/class.c return Scm_VMSlotRefUsingAccessor(SCM_OBJ(data[0]), data 1361 src/class.c SCM_SLOT_ACCESSOR(data[1]), data 1362 src/class.c (int)data[2]); data 1375 src/class.c void *data[3]; data 1376 src/class.c data[0] = obj; data 1377 src/class.c data[1] = sa; data 1378 src/class.c data[2] = (void*)boundp; data 1379 src/class.c Scm_VMPushCC(slot_ref_using_accessor_cc1, data, 3); data 1459 src/class.c return Scm_VMSlotSet(SCM_OBJ(data[0]), SCM_OBJ(data[1]), SCM_OBJ(data[2])); data 1466 src/class.c void *data[3]; data 1468 src/class.c data[0] = obj; data 1469 src/class.c data[1] = slot; data 1470 src/class.c data[2] = val; data 1471 src/class.c Scm_VMPushCC(slot_set_cc, data, 3); data 1491 src/class.c return Scm_VMSlotSetUsingAccessor(SCM_OBJ(data[0]), data 1492 src/class.c SCM_SLOT_ACCESSOR(data[1]), data 1493 src/class.c SCM_OBJ(data[2])); data 1506 src/class.c void *data[3]; data 1507 src/class.c data[0] = obj; data 1508 src/class.c data[1] = sa; data 1509 src/class.c data[2] = val; data 1510 src/class.c Scm_VMPushCC(slot_set_using_accessor_cc, data, 3); data 1567 src/class.c ScmObj obj = SCM_OBJ(data[0]); data 1568 src/class.c ScmObj slot = SCM_OBJ(data[1]); data 1575 src/class.c void *data[2]; data 1578 src/class.c data[0] = obj; data 1579 src/class.c data[1] = slot; data 1580 src/class.c Scm_VMPushCC(slot_boundp_cc, data, 2); data 1837 src/class.c ScmObj obj = SCM_OBJ(data[0]); data 1838 src/class.c ScmObj accs = SCM_OBJ(data[1]); data 1839 src/class.c ScmObj initargs = SCM_OBJ(data[2]); data 1915 src/class.c instance->data = NULL; data 1959 src/class.c gf->data = data; data 2200 src/class.c m->data = SCM_CLOSURE(body)->code; data 2212 src/class.c SCM_COMPILED_CODE(m->data)->name = Scm_Cons(SCM_PROCEDURE_INFO(g), h); data 2470 src/class.c ScmSlotAccessor *ca = (ScmSlotAccessor*)data; data 2489 src/class.c ScmSlotAccessor *ca = (ScmSlotAccessor*)data; data 2504 src/class.c ScmMethod *m = SCM_METHOD(method_initialize(nm, args, nargs, data)); data 2513 src/class.c m->data = sa; data 2539 src/class.c SCM_ASSERT(SCM_SLOT_ACCESSOR_P(m->data)); data 2540 src/class.c return SCM_OBJ(m->data); data 2548 src/class.c m->data = v; data 2569 src/class.c struct foreign_data_rec *data = SCM_NEW(struct foreign_data_rec); data 2580 src/class.c data->flags = flags; data 2581 src/class.c data->cleanup = cleanup_proc; data 2583 src/class.c data->identity_map = data 2586 src/class.c data->identity_map = NULL; data 2588 src/class.c fp->data = (void*)data; /* see the note above class_allocate() */ data 2594 src/class.c void (*cleanup)(ScmObj) = (void (*)(ScmObj))data; data 2606 src/class.c if (data->cleanup) { data 2607 src/class.c Scm_RegisterFinalizer(SCM_OBJ(obj), fp_finalize, data->cleanup); data 2615 src/class.c struct foreign_data_rec *data = (struct foreign_data_rec *)klass->data; data 2624 src/class.c if (ptr == NULL && (data->flags & SCM_FOREIGN_POINTER_MAP_NULL)) { data 2628 src/class.c if (data->identity_map) { data 2629 src/class.c ScmHashEntry *e = Scm_HashTableAddRaw(data->identity_map, ptr, NULL); data 2632 src/class.c obj = make_foreign_int(klass, ptr, data); data 2638 src/class.c obj = make_foreign_int(klass, ptr, data); data 2642 src/class.c obj = make_foreign_int(klass, ptr, data); data 106 src/code.c ScmCompiledCode **cs = (ScmCompiledCode **)data[0]; data 110 src/code.c data[0] = cs+1; data 111 src/code.c Scm_VMPushCC(execute_toplevels_cc, data, 1); data 106 src/compare.c } else if (cmp(elts[l*2-1], elts[l*2], data) < 0) { data 111 src/compare.c if (cmp(elts[l-1], elts[maxchild], data) < 0) { data 127 src/compare.c shift_up(elts, l, nelts, cmp, data); data 133 src/compare.c shift_up(elts, 0, r, cmp, data); data 143 src/compare.c sort_h(elts+lo, (hi-lo+1), cmp, data); data 149 src/compare.c while (l <= r && cmp(elts[l], pivot, data) < 0) l++; data 150 src/compare.c while (l <= r && cmp(pivot, elts[r], data) < 0) r--; data 156 src/compare.c if (lo < r) sort_q(elts, lo, r, depth+1, limit, cmp, data); data 196 src/core.c Scm_Printf(SCM_CURERR, "WARNING: object %s(%p) is inadvertently collected\n", (char *)data, obj); data 212 src/core.c data, &ofn, &ocd); data 242 src/core.c void (*handler)(void *data); data 243 src/core.c void *data; data 258 src/core.c r->data = d; data 311 src/core.c ch->handler(ch->data); data 385 src/error.c e->data = SCM_UNDEFINED; data 3265 src/extlib.c ScmObj scmflusher = SCM_OBJ(p->src.buf.data); data 3275 src/extlib.c scmfiller = SCM_OBJ(p->src.buf.data); data 3312 src/extlib.c bufrec.data = (void*)filler; data 3324 src/extlib.c scmflusher = SCM_OBJ(p->src.buf.data); data 3352 src/extlib.c bufrec.data = (void*)flusher; data 4640 src/extlib.c ScmHashEntry *e = (ScmHashEntry*)data[0]; data 4676 src/extlib.c void *data[1]; data 4683 src/extlib.c data[0] = (void*)e; data 4684 src/extlib.c Scm_VMPushCC(hash_table_update_cc, data, 1); data 4768 src/extlib.c ScmHashIter *iter = (ScmHashIter*)data; data 487 src/gauche.h void *data; /* extra data to do nasty trick */ data 1138 src/gauche.h char data[SCM_DSTRING_INIT_CHUNK_SIZE]; /* variable length, indeed. */ data 1313 src/gauche.h void *data; data 1340 src/gauche.h void *data; data 1376 src/gauche.h ScmObj data; /* used internally */ data 1703 src/gauche.h void *data; data 2280 src/gauche.h void *data; data 2287 src/gauche.h #define SCM_SUBR_DATA(obj) SCM_SUBR(obj)->data data 2293 src/gauche.h (func), (data) \ data 2312 src/gauche.h void *data; data 2320 src/gauche.h #define SCM_GENERIC_DATA(obj) (SCM_GENERIC(obj)->data) data 2327 src/gauche.h SCM_NIL, cfunc, data \ data 2347 src/gauche.h ScmObj (*func)(ScmNextMethod *nm, ScmObj *args, int nargs, void * data); data 2348 src/gauche.h void *data; /* closure, or code */ data 2362 src/gauche.h gf, specs, func, data, NULL \ data 2413 src/gauche.h void *data; data 230 src/gauche/exception.h ScmObj data; /* additional data. data 560 src/gauche/vm.h ScmObj (*func)(ScmObj value, void **data); data 561 src/gauche/vm.h void *data[SCM_CCONT_DATA_SIZE]; data 438 src/hash.c ScmWord keysize = (ScmWord)table->data; data 453 src/hash.c ScmWord keysize = (ScmWord)table->data; data 537 src/hash.c z->data = data; data 594 src/hash.c cmpfn, initSize, data); data 1622 src/intlib.c ScmObj proc = SCM_OBJ(data[0]); data 1623 src/intlib.c ScmObj r = SCM_OBJ(data[1]); data 1624 src/intlib.c ScmObj lis = SCM_OBJ(data[2]); data 1625 src/intlib.c ScmObj c = SCM_OBJ(data[3]); data 1629 src/intlib.c data[1] = Scm_Cons(result, r); data 1630 src/intlib.c data[2] = SCM_CDR(lis); data 1631 src/intlib.c Scm_VMPushCC(map1c_cc, data, 4); data 1651 src/intlib.c void *data[4]; data 1653 src/intlib.c data[0] = proc; data 1654 src/intlib.c data[1] = SCM_NIL; data 1655 src/intlib.c data[2] = SCM_CDR(lis); data 1656 src/intlib.c data[3] = c; data 1657 src/intlib.c Scm_VMPushCC(map1c_cc, data, 4); data 1667 src/intlib.c ScmObj proc = SCM_OBJ(data[0]); data 1668 src/intlib.c ScmObj r = SCM_OBJ(data[1]); data 1669 src/intlib.c ScmObj lis = SCM_OBJ(data[2]); data 1670 src/intlib.c ScmObj c1 = SCM_OBJ(data[3]); data 1671 src/intlib.c ScmObj c2 = SCM_OBJ(data[4]); data 1675 src/intlib.c data[1] = Scm_Cons(result, r); data 1676 src/intlib.c data[2] = SCM_CDR(lis); data 1677 src/intlib.c Scm_VMPushCC(map1cc_cc, data, 5); data 1701 src/intlib.c void *data[5]; data 1703 src/intlib.c data[0] = proc; data 1704 src/intlib.c data[1] = SCM_NIL; data 1705 src/intlib.c data[2] = SCM_CDR(lis); data 1706 src/intlib.c data[3] = c1; data 1707 src/intlib.c data[4] = c2; data 1708 src/intlib.c Scm_VMPushCC(map1cc_cc, data, 5); data 125 src/load.c struct load_packet *p = (struct load_packet *)data; data 149 src/load.c struct load_packet *p = (struct load_packet*)(data[0]); data 153 src/load.c Scm_VMPushCC(load_cc, data, 1); data 162 src/load.c return load_cc(SCM_NIL, &data); data 88 src/macro.c s->data = data; data 189 src/macro.c ScmObj proc = SCM_OBJ(data); data 210 src/macro.c ScmObj proc = SCM_OBJ(data); data 231 src/macro.c ScmMacro *mac = resolve_macro_autoload(SCM_AUTOLOAD(data)); data 232 src/macro.c return mac->transformer(SCM_OBJ(mac), form, env, mac->data); data 904 src/macro.c ScmSyntaxRules *sr = (ScmSyntaxRules *)data; data 929 src/macro.c ScmObj env = SCM_OBJ(data[0]); data 966 src/macro.c void *data[1]; data 967 src/macro.c data[0] = env; data 968 src/macro.c Scm_VMPushCC(macro_expand_cc, data, 1); data 977 src/macro.c return mac->transformer(SCM_OBJ(mac), expr, env, mac->data); data 15 src/moplib.c ScmObj proc = SCM_OBJ(gf->data); data 96 src/moplib.c else SCM_RETURN(SCM_OBJ(m->data)); data 140 src/port.c port->data = SCM_FALSE; data 178 src/port.c ScmPort *p = (ScmPort*)data; data 186 src/port.c ScmPort *p = (ScmPort*)data; data 466 src/port.c p->src.buf.data = bufrec->data; data 765 src/port.c int fd = (int)p->src.buf.data; data 789 src/port.c int fd = (int)p->src.buf.data; data 810 src/port.c int fd = (int)p->src.buf.data; data 817 src/port.c int fd = (int)p->src.buf.data; data 824 src/port.c return (int)p->src.buf.data; data 829 src/port.c return lseek((int)p->src.buf.data, offset, whence); data 861 src/port.c bufrec.data = (void*)fd; data 889 src/port.c bufrec.data = (void*)fd; data 1131 src/port.c SCM_ASSERT(data->source != NULL); data 1137 src/port.c c = Scm_GetbUnsafe(data->source); data 1141 src/port.c Scm_UngetbUnsafe(c, data->source); data 1155 src/port.c data->pbuf = Scm_DStringGetz(&ds); data 1156 src/port.c data->pbufsize = strlen(data->pbuf); data 1159 src/port.c encoding = look_for_encoding(data->pbuf); data 1176 src/port.c data->source = Scm_CodingAwarePortHook(data->source, encoding); data 1182 src/port.c coding_port_data *data = (coding_port_data*)p->src.buf.data; data 1185 src/port.c SCM_ASSERT(data->source); data 1188 src/port.c if (data->state == CODING_PORT_FLUSHED) { data 1189 src/port.c return Scm_GetzUnsafe(datptr, cnt, data->source); data 1192 src/port.c if (data->state == CODING_PORT_INIT) { data 1193 src/port.c coding_port_recognize_encoding(p, data); data 1194 src/port.c data->state = CODING_PORT_RECOGNIZED; data 1198 src/port.c if (data->pbufsize > 0) { data 1199 src/port.c if (data->pbufsize <= cnt) { data 1200 src/port.c memcpy(datptr, data->pbuf, data->pbufsize); data 1201 src/port.c nread = data->pbufsize; data 1202 src/port.c data->pbuf = NULL; data 1203 src/port.c data->pbufsize = 0; data 1204 src/port.c data->state = CODING_PORT_FLUSHED; data 1206 src/port.c memcpy(datptr, data->pbuf, cnt); data 1208 src/port.c data->pbuf += cnt; data 1209 src/port.c data->pbufsize -= cnt; data 1213 src/port.c data->state = CODING_PORT_FLUSHED; data 1214 src/port.c return Scm_GetzUnsafe(datptr, cnt, data->source); data 1220 src/port.c coding_port_data *data = (coding_port_data*)p->src.buf.data; data 1221 src/port.c if (data->source) { data 1222 src/port.c Scm_ClosePort(data->source); data 1223 src/port.c data->source = NULL; data 1229 src/port.c coding_port_data *data = (coding_port_data*)p->src.buf.data; data 1230 src/port.c if (data->source == NULL) return TRUE; data 1231 src/port.c if (data->state == CODING_PORT_RECOGNIZED) { data 1240 src/port.c coding_port_data *data = (coding_port_data*)p->src.buf.data; data 1241 src/port.c if (data->source == NULL) return -1; data 1242 src/port.c return Scm_PortFileNo(data->source); data 1249 src/port.c coding_port_data *data; data 1254 src/port.c data = SCM_NEW(coding_port_data); data 1255 src/port.c data->source = iport; data 1256 src/port.c data->state = CODING_PORT_INIT; data 1257 src/port.c data->pbuf = NULL; data 1258 src/port.c data->pbufsize = 0; data 1269 src/port.c bufrec.data = (void*)data; data 1288 src/port.c struct with_port_packet *p = (struct with_port_packet*)data; data 100 src/proc.c s->data = data; data 133 src/proc.c ScmObj args = SCM_OBJ(data[1]); data 135 src/proc.c ScmObj proc = SCM_OBJ(data[0]); data 136 src/proc.c void *data[2]; data 137 src/proc.c data[0] = proc; data 138 src/proc.c data[1] = SCM_CDR(args); data 139 src/proc.c Scm_VMPushCC(foreach1_cc, data, 2); data 149 src/proc.c void *data[2]; data 150 src/proc.c data[0] = proc; data 151 src/proc.c data[1] = SCM_CDR(args); data 152 src/proc.c Scm_VMPushCC(foreach1_cc, data, 2); data 161 src/proc.c ScmObj args = SCM_OBJ(data[1]); data 162 src/proc.c ScmObj head = SCM_OBJ(data[2]); data 163 src/proc.c ScmObj tail = SCM_OBJ(data[3]); data 168 src/proc.c ScmObj proc = SCM_OBJ(data[0]); data 169 src/proc.c void *data[4]; data 170 src/proc.c data[0] = proc; data 171 src/proc.c data[1] = SCM_CDR(args); data 172 src/proc.c data[2] = head; data 173 src/proc.c data[3] = tail; data 174 src/proc.c Scm_VMPushCC(map1_cc, data, 4); data 184 src/proc.c void *data[4]; data 185 src/proc.c data[0] = proc; data 186 src/proc.c data[1] = SCM_CDR(args); data 187 src/proc.c data[2] = SCM_NIL; data 188 src/proc.c data[3] = SCM_NIL; data 189 src/proc.c Scm_VMPushCC(map1_cc, data, 4); data 227 src/proc.c ScmObj args_list = SCM_OBJ(data[1]); data 235 src/proc.c proc = SCM_OBJ(data[0]); data 247 src/proc.c void *data[2]; data 248 src/proc.c data[0] = proc; data 249 src/proc.c data[1] = Scm_Cons(arg1, args); data 250 src/proc.c SCM_RETURN(foreachN_cc(SCM_UNDEFINED, data)); data 257 src/proc.c ScmObj args_list = SCM_OBJ(data[1]); data 258 src/proc.c ScmObj head = SCM_OBJ(data[2]); data 259 src/proc.c ScmObj tail = SCM_OBJ(data[3]); data 269 src/proc.c proc = SCM_OBJ(data[0]); data 284 src/proc.c void *data[4]; data 292 src/proc.c data[0] = proc; data 293 src/proc.c data[1] = moreargs; data 294 src/proc.c data[2] = SCM_NIL; data 295 src/proc.c data[3] = SCM_NIL; data 296 src/proc.c Scm_VMPushCC(mapN_cc, data, 4); data 319 src/proc.c Scm_Cons(SCM_OBJ(data), args[0])); data 194 src/prof.c func = SCM_OBJ(SCM_METHOD(func)->data); data 114 src/promise.c ScmPromise *p = (ScmPromise*)data[0]; data 75 src/repl.c return repl_main(NULL, 0, data); data 80 src/repl.c ScmObj *closure = (ScmObj *)data; data 84 src/repl.c Scm_VMPushCC(repl_print_cc, data, 4); data 101 src/repl.c return repl_main(NULL, 0, (void*)data); data 107 src/repl.c ScmObj *closure = (ScmObj*)data; data 112 src/repl.c Scm_VMPushCC(repl_eval_cc, data, 4); data 115 src/repl.c Scm_VMPushCC(repl_eval_cc, data, 4); data 122 src/repl.c ScmObj *closure = (ScmObj*)data; data 125 src/repl.c Scm_VMPushCC(repl_read_cc, data, 4); data 129 src/repl.c return repl_read_cc(exp, data); data 135 src/repl.c ScmObj *closure = (ScmObj*)data; data 138 src/repl.c Scm_VMPushCC(repl_prompt_cc, data, 4); data 144 src/repl.c return repl_prompt_cc(SCM_UNDEFINED, (void**)data); data 158 src/repl.c ScmObj *closure = (ScmObj*)data; data 1405 src/string.c dstr->current = dstr->init.data; data 1417 src/string.c dstr->tail->chunk->bytes = (int)(dstr->current - dstr->tail->chunk->data); data 1422 src/string.c size = (int)(dstr->current - dstr->init.data); data 1435 src/string.c dstr->tail->chunk->bytes = (int)(dstr->current - dstr->tail->chunk->data); data 1437 src/string.c dstr->init.bytes = (int)(dstr->current - dstr->init.data); data 1464 src/string.c dstr->current = newchunk->data; data 1465 src/string.c dstr->end = newchunk->data + newsize; data 1476 src/string.c size = (int)(dstr->current - dstr->init.data); data 1479 src/string.c memcpy(buf, dstr->init.data, size); data 1489 src/string.c memcpy(bptr, dstr->init.data, dstr->init.bytes); data 1492 src/string.c memcpy(bptr, chain->chunk->data, chain->chunk->bytes); data 1569 src/string.c fwrite(dstr->init.data, 1, dstr->init.bytes, out); data 1572 src/string.c int size = (chain->next? chain->chunk->bytes : (int)(dstr->current - dstr->tail->chunk->data)); data 1574 src/string.c fwrite(chain->chunk->data, 1, size, out); data 1578 src/string.c int size = (int)(dstr->current - dstr->init.data); data 1580 src/string.c fwrite(dstr->init.data, 1, size, out); data 881 src/vm.c SCM_SUBR(VAL0)->data); data 991 src/vm.c SCM_METHOD(VAL0)->data); data 1003 src/vm.c VM_ASSERT(SCM_COMPILED_CODE_P(SCM_METHOD(VAL0)->data)); data 1004 src/vm.c vm->base = SCM_COMPILED_CODE(SCM_METHOD(VAL0)->data); data 2780 src/vm.c Scm_VM()->module = SCM_MODULE(data); data 2988 src/vm.c *s++ = SCM_OBJ(data[i]); data 3005 src/vm.c void *data[3]; data 3016 src/vm.c data[0] = (void*)before; data 3017 src/vm.c data[1] = (void*)body; data 3018 src/vm.c data[2] = (void*)after; data 3020 src/vm.c Scm_VMPushCC(dynwind_before_cc, data, 3); data 3026 src/vm.c ScmObj before = SCM_OBJ(data[0]); data 3027 src/vm.c ScmObj body = SCM_OBJ(data[1]); data 3028 src/vm.c ScmObj after = SCM_OBJ(data[2]); data 3042 src/vm.c ScmObj after = SCM_OBJ(data[0]); data 3043 src/vm.c ScmObj prev = SCM_OBJ(data[1]); data 3060 src/vm.c ScmObj val0 = SCM_OBJ(data[0]); data 3062 src/vm.c int nvals = (int)data[1]; data 3066 src/vm.c memcpy(vm->vals, data[2], sizeof(ScmObj)*(nvals-1)); data 3079 src/vm.c before ? Scm_MakeSubr(before, data, 0, 0, SCM_FALSE) : Scm_NullProc(); data 3081 src/vm.c after ? Scm_MakeSubr(after, data, 0, 0, SCM_FALSE) : Scm_NullProc(); data 3083 src/vm.c body ? Scm_MakeSubr(body, data, 0, 0, SCM_FALSE) : Scm_NullProc(); data 3316 src/vm.c ScmEscapePoint *ep = (ScmEscapePoint*)data; data 3326 src/vm.c ScmEscapePoint *ep = (ScmEscapePoint *)data; data 3374 src/vm.c theVM->exceptionHandler = SCM_OBJ(data); data 3421 src/vm.c void *data[3]; data 3430 src/vm.c data[0] = (void*)SCM_CDR(handlers); data 3431 src/vm.c data[1] = (void*)ep; data 3432 src/vm.c data[2] = (void*)args; data 3433 src/vm.c Scm_VMPushCC(throw_cont_cc, data, 3); data 3461 src/vm.c ScmObj handlers = SCM_OBJ(data[0]); data 3462 src/vm.c ScmEscapePoint *ep = (ScmEscapePoint *)data[1]; data 3463 src/vm.c ScmObj args = SCM_OBJ(data[2]); data 3470 src/vm.c ScmEscapePoint *ep = (ScmEscapePoint*)data; data 3608 src/vm.c vm->numVals = (int)data[0]; data 3609 src/vm.c vm->val0 = data[1]; data 3611 src/vm.c cp = SCM_OBJ(data[2]); data 3622 src/vm.c void *data[3]; data 3625 src/vm.c data[0] = (void*)vm->numVals; data 3626 src/vm.c data[1] = vm->val0; data 3634 src/vm.c data[2] = h; data 3636 src/vm.c data[2] = NULL; data 3638 src/vm.c Scm_VMPushCC(process_queued_requests_cc, data, 3); data 145 src/write.c SCM_ASSERT(SCM_PAIRP(port->data)&&SCM_HASH_TABLE_P(SCM_CDR(port->data))); data 151 src/write.c SCM_ASSERT(SCM_PAIRP(port->data)&&SCM_HASH_TABLE_P(SCM_CDR(port->data))); data 333 src/write.c port->data = Scm_Cons(SCM_MAKE_INT(0), ht); data 345 src/write.c ht = SCM_HASH_TABLE(SCM_CDR(port->data)); data 406 src/write.c if (SCM_PAIRP(port->data) && SCM_HASH_TABLE_P(SCM_CDR(port->data))) { data 407 src/write.c ht = SCM_HASH_TABLE(SCM_CDR(port->data)); data 465 src/write.c int count = SCM_INT_VALUE(SCM_CAR(port->data)); data 468 src/write.c SCM_SET_CAR(port->data, SCM_MAKE_INT(count+1)); data 552 src/write.c port->data = walker_port->data; data 555 src/write.c port->data = SCM_FALSE; data 582 src/write.c SCM_ASSERT(SCM_PAIRP(port->data)&&SCM_HASH_TABLE_P(SCM_CDR(port->data))); data 587 src/write.c SCM_ASSERT(SCM_PAIRP(port->data)&&SCM_HASH_TABLE_P(SCM_CDR(port->data)));