base 62 gc/blacklst.c ptr_t base = GC_base(p); base 64 gc/blacklst.c GC_err_printf2("start: 0x%lx, appr. length: %ld", base, GC_size(base)); base 73 gc/blacklst.c ptr_t base = GC_base(p); base 74 gc/blacklst.c if (0 == base) { base 82 gc/blacklst.c (*GC_print_heap_obj)(base); base 163 gc/dbg_mlc.c ptr_t base; base 166 gc/dbg_mlc.c base = GC_base(result); base 167 gc/dbg_mlc.c if (0 == base) continue; base 168 gc/dbg_mlc.c if (!GC_is_marked(base)) continue; base 180 gc/dbg_mlc.c void *base; base 185 gc/dbg_mlc.c source = GC_get_back_ptr_info(current, &base, &offset); base 198 gc/dbg_mlc.c GC_err_printf1("root at 0x%lx\n\n", (unsigned long)base); base 209 gc/dbg_mlc.c GC_print_heap_obj(GC_base(base)); base 213 gc/dbg_mlc.c current = base; base 777 gc/dbg_mlc.c register GC_PTR base; base 781 gc/dbg_mlc.c base = GC_base(p); base 782 gc/dbg_mlc.c if (base == 0) { base 787 gc/dbg_mlc.c if ((ptr_t)p - (ptr_t)base != sizeof(oh)) { base 793 gc/dbg_mlc.c clobbered = GC_check_annotated_obj((oh *)base); base 795 gc/dbg_mlc.c if (((oh *)base) -> oh_sz == GC_size(base)) { base 804 gc/dbg_mlc.c ((oh *)base) -> oh_sz = GC_size(base); base 808 gc/dbg_mlc.c GC_free(base); base 822 gc/dbg_mlc.c GC_free(base); base 828 gc/dbg_mlc.c GC_ASSERT((word *)p + i == (word *)base + hhdr -> hb_sz); base 854 gc/dbg_mlc.c register GC_PTR base = GC_base(p); base 862 gc/dbg_mlc.c if (base == 0) { base 867 gc/dbg_mlc.c if ((ptr_t)p - (ptr_t)base != sizeof(oh)) { base 873 gc/dbg_mlc.c hhdr = HDR(base); base 899 gc/dbg_mlc.c old_sz = GC_size(base) - sizeof(oh); base 901 gc/dbg_mlc.c clobbered = GC_check_annotated_obj((oh *)base); base 906 gc/dbg_mlc.c old_sz = ((oh *)base) -> oh_sz; base 1084 gc/dbg_mlc.c ptr_t base = GC_base(obj); base 1085 gc/dbg_mlc.c if (0 == base) return; base 1086 gc/dbg_mlc.c if ((ptr_t)obj - base != sizeof(oh)) { base 1092 gc/dbg_mlc.c GC_register_finalizer(base, 0, 0, &my_old_fn, &my_old_cd); base 1094 gc/dbg_mlc.c GC_register_finalizer(base, GC_debug_invoke_finalizer, base 1117 gc/dbg_mlc.c ptr_t base = GC_base(obj); base 1118 gc/dbg_mlc.c if (0 == base) return; base 1119 gc/dbg_mlc.c if ((ptr_t)obj - base != sizeof(oh)) { base 1125 gc/dbg_mlc.c GC_register_finalizer_no_order(base, 0, 0, &my_old_fn, &my_old_cd); base 1127 gc/dbg_mlc.c GC_register_finalizer_no_order(base, GC_debug_invoke_finalizer, base 1151 gc/dbg_mlc.c ptr_t base = GC_base(obj); base 1152 gc/dbg_mlc.c if (0 == base) return; base 1153 gc/dbg_mlc.c if ((ptr_t)obj - base != sizeof(oh)) { base 1159 gc/dbg_mlc.c GC_register_finalizer_ignore_self(base, 0, 0, &my_old_fn, &my_old_cd); base 1161 gc/dbg_mlc.c GC_register_finalizer_ignore_self(base, GC_debug_invoke_finalizer, base 712 gc/dyn_load.c char * curr_base = base; base 716 gc/dyn_load.c if (base == limit) return; base 731 gc/dyn_load.c if (base == limit) return; base 732 gc/dyn_load.c if (limit > stack_top && base < GC_stackbottom) { base 736 gc/dyn_load.c GC_add_roots_inner(base, limit, TRUE); base 853 gc/dyn_load.c char * base; base 859 gc/dyn_load.c base = limit = p = GC_sysinfo.lpMinimumApplicationAddress; base 893 gc/dyn_load.c GC_cond_add_roots(base, limit); base 894 gc/dyn_load.c base = p; base 902 gc/dyn_load.c GC_cond_add_roots(base, limit); base 145 gc/finalize.c ptr_t base; base 147 gc/finalize.c base = (ptr_t)GC_base((GC_PTR)link); base 148 gc/finalize.c if (base == 0) base 150 gc/finalize.c return(GC_general_register_disappearing_link(link, base)); base 336 gc/finalize.c ptr_t base; base 366 gc/finalize.c base = (ptr_t)obj; base 367 gc/finalize.c index = HASH2(base, log_fo_table_size); base 370 gc/finalize.c if (curr_fo -> fo_hidden_base == HIDE_POINTER(base)) { base 421 gc/finalize.c GET_HDR(base, hhdr); base 449 gc/finalize.c new_fo -> fo_hidden_base = (word)HIDE_POINTER(base); base 324 gc/include/gc_cpp.h void* base = GC_base( (void *) this ); base 325 gc/include/gc_cpp.h if (0 != base) { base 328 gc/include/gc_cpp.h base, (GC_finalization_proc)cleanup, (void*) ((char*) this - (char*) base), base 331 gc/include/gc_cpp.h GC_register_finalizer_ignore_self( base, oldProc, oldData, 0, 0 );}}} base 136 gc/include/private/dbg_mlc.h # define ADD_CALL_CHAIN(base, ra) GC_save_callers(((oh *)(base)) -> oh_ci) base 137 gc/include/private/dbg_mlc.h # define PRINT_CALL_CHAIN(base) GC_print_callers(((oh *)(base)) -> oh_ci) base 140 gc/include/private/dbg_mlc.h # define ADD_CALL_CHAIN(base, ra) ((oh *)(base)) -> oh_ci[0].ci_pc = (ra) base 141 gc/include/private/dbg_mlc.h # define PRINT_CALL_CHAIN(base) GC_print_callers(((oh *)(base)) -> oh_ci) base 604 gc/mark_rts.c GC_PTR base = GC_base(GC_obj_kinds[kind].ok_freelist); base 605 gc/mark_rts.c if (0 != base) { base 606 gc/mark_rts.c GC_set_mark_bit(base); base 445 gc/os_dep.c unsigned long base; base 457 gc/os_dep.c #define O32_BASE(x) (x).base base 636 gc/os_dep.c if (base != 0) *base = (ptr_t)(buf.AllocationBase); base 1004 gc/os_dep.c ptr_t base; base 1006 gc/os_dep.c int r = sysctl(nm, 2, &base, &len, NULL, 0); base 1010 gc/os_dep.c return base; base 1326 gc/os_dep.c char * base; base 1330 gc/os_dep.c p = base = limit = GC_least_described_address(static_root); base 1342 gc/os_dep.c if (base != limit) GC_add_roots_inner(base, limit, FALSE); base 1343 gc/os_dep.c base = p; base 1350 gc/os_dep.c if (base != limit) GC_add_roots_inner(base, limit, FALSE); base 54 gc/ptr_chck.c register ptr_t base, limit; base 83 gc/ptr_chck.c base = (ptr_t)HBLKPTR(p); base 84 gc/ptr_chck.c limit = base + sz; base 100 gc/ptr_chck.c base = (char *)((word)p & ~(WORDS_TO_BYTES(1) - 1)); base 101 gc/ptr_chck.c base -= WORDS_TO_BYTES(map_entry); base 102 gc/ptr_chck.c limit = base + sz; base 108 gc/ptr_chck.c if ((ptr_t)q >= limit || (ptr_t)q < base) { base 262 gc/ptr_chck.c ptr_t base = GC_base(p); /* Should be manually inlined? */ base 264 gc/ptr_chck.c if (base == 0) goto fail; base 265 gc/ptr_chck.c if (HBLKPTR(base) != HBLKPTR(p)) hhdr = HDR((word)p); base 270 gc/ptr_chck.c if ((word)((ptr_t)p - (ptr_t)base) > (word)descr) goto fail; base 273 gc/ptr_chck.c if ((ptr_t)p - (ptr_t)base base 276 gc/ptr_chck.c if (!((1 << (WORDSZ - ((ptr_t)p - (ptr_t)base) - 1)) base 285 gc/ptr_chck.c descr = *(word *)((ptr_t)base + (descr & ~GC_DS_TAGS)); base 287 gc/ptr_chck.c ptr_t type_descr = *(ptr_t *)base; base 427 gc/solaris_threads.c ptr_t base; base 445 gc/solaris_threads.c register ptr_t base; base 458 gc/solaris_threads.c base = GC_stack_free_lists[index]->base; base 462 gc/solaris_threads.c base = (ptr_t)mmap(0, search_sz + GC_page_size, base 465 gc/solaris_threads.c if (base == (ptr_t)-1) base 471 gc/solaris_threads.c mprotect(base, GC_page_size, PROT_NONE); base 473 gc/solaris_threads.c GC_is_fresh((struct hblk *)base, divHBLKSZ(search_sz)); base 474 gc/solaris_threads.c base += GC_page_size; base 477 gc/solaris_threads.c base = (ptr_t) GC_scratch_alloc(search_sz + 2*GC_page_size); base 478 gc/solaris_threads.c if (base == NULL) base 484 gc/solaris_threads.c base = (ptr_t)(((word)base + GC_page_size) & ~(GC_page_size - 1)); base 487 gc/solaris_threads.c mprotect(base, GC_page_size, PROT_NONE); base 489 gc/solaris_threads.c GC_is_fresh((struct hblk *)base, divHBLKSZ(search_sz)); base 491 gc/solaris_threads.c base += GC_page_size; base 495 gc/solaris_threads.c return(base); base 518 gc/solaris_threads.c head->base = stack; base 542 gc/solaris_threads.c p = s->base; base 1052 src/class.c ScmClass *base; base 1056 src/class.c if ((base = Scm_BaseClassOf(srcklass)) == NULL base 1057 src/class.c || !SCM_EQ(base, Scm_BaseClassOf(dstklass))) { base 1061 src/class.c if (base->coreSize < sizeof(ScmInstance)) { base 1064 src/class.c memcpy(dst, src, base->coreSize); base 113 src/code.c vm->base = cs[0]; base 114 src/code.c vm->pc = vm->base->code; base 105 src/gauche/vm.h ScmCompiledCode *base; /* base register value */ base 382 src/gauche/vm.h ScmCompiledCode *base; /* Current executing closure's code packet. */ base 273 src/load.c if (regfilep(base)) return base; base 275 src/load.c fpath = Scm_StringAppend2(SCM_STRING(base), SCM_STRING(SCM_CAR(sp))); base 79 src/parameter.c if (base) { base 80 src/parameter.c table->vector = SCM_NEW_ARRAY(ScmObj, base->parameters.numAllocated); base 82 src/parameter.c table->numAllocated = base->parameters.numAllocated; base 83 src/parameter.c table->numParameters = base->parameters.numParameters; base 85 src/parameter.c table->vector[i] = base->parameters.vector[i]; base 86 src/parameter.c table->ids[i] = base->parameters.ids[i]; base 126 src/prof.c if (vm->base) { base 134 src/prof.c vm->prof->samples[i].func = SCM_OBJ(vm->base); base 190 src/vm.c v->base = NULL; base 346 src/vm.c #define BASE vm->base base 354 src/vm.c #define BASE vm->base base 362 src/vm.c #define BASE vm->base base 370 src/vm.c #define BASE vm->base base 378 src/vm.c #define BASE vm->base base 505 src/vm.c newcont->base = BASE; \ base 529 src/vm.c BASE = CONT->base; \ base 538 src/vm.c BASE = CONT->base; \ base 545 src/vm.c BASE = CONT->base; \ base 897 src/vm.c vm->base = SCM_COMPILED_CODE(SCM_CLOSURE(VAL0)->code); base 898 src/vm.c PC = vm->base->code; base 899 src/vm.c CHECK_STACK(vm->base->maxstack); base 900 src/vm.c SCM_PROF_COUNT_CALL(vm, SCM_OBJ(vm->base)); base 1004 src/vm.c vm->base = SCM_COMPILED_CODE(SCM_METHOD(VAL0)->data); base 1005 src/vm.c PC = vm->base->code; base 1006 src/vm.c CHECK_STACK(vm->base->maxstack); base 1007 src/vm.c SCM_PROF_COUNT_CALL(vm, SCM_OBJ(vm->base)); base 1268 src/vm.c vm->base = SCM_COMPILED_CODE(SCM_CLOSURE(VAL0)->code); base 1269 src/vm.c PC = vm->base->code; base 1270 src/vm.c CHECK_STACK(vm->base->maxstack); base 1271 src/vm.c SCM_PROF_COUNT_CALL(vm, SCM_OBJ(vm->base)); base 2809 src/vm.c vm->base = SCM_COMPILED_CODE(v); base 2852 src/vm.c vm->base = SCM_COMPILED_CODE(program); base 2856 src/vm.c PC = vm->base->code; base 2857 src/vm.c CHECK_STACK(vm->base->maxstack); base 2961 src/vm.c program = vm->base? SCM_OBJ(vm->base) : SCM_OBJ(&internal_apply_compiled_code); base 2985 src/vm.c cc->base = BASE; base 3674 src/vm.c info = Scm_VMGetSourceInfo(vm->base, vm->pc); base 3677 src/vm.c info = Scm_VMGetSourceInfo(c->base, c->pc); base 3751 src/vm.c if (base == NULL base 3752 src/vm.c || (pc < base->code && pc >= base->code + base->codeSize)) { base 3755 src/vm.c off = pc - base->code - 1; /* pc is already incremented, so -1. */ base 3756 src/vm.c SCM_FOR_EACH(ip, base->info) { base 3769 src/vm.c ScmObj info = get_debug_info(base, pc); base 3779 src/vm.c ScmObj info = get_debug_info(base, pc); base 3832 src/vm.c Scm_Printf(out, " base = %p\n", cont->base); base 3849 src/vm.c if (vm->base) { base 3851 src/vm.c Scm_CompiledCodeDump(vm->base); base 49 src/vmstat.c if (vm->base && vm->pc != vm->base->code) { base 160 src/weak.c GC_PTR base = GC_base((GC_PTR)value); base 162 src/weak.c if (base != NULL) { base 163 src/weak.c GC_general_register_disappearing_link((GC_PTR)&wbox->ptr, base);