intern table seems conventionally called 'oblist'
This commit is contained in:
parent
205ca79626
commit
7b86c6d34e
|
@ -644,7 +644,7 @@ gc_sweep_phase(pic_state *pic)
|
|||
struct heap_page *page;
|
||||
khiter_t it;
|
||||
khash_t(reg) *h;
|
||||
khash_t(s) *s = &pic->syms;
|
||||
khash_t(s) *s = &pic->oblist;
|
||||
pic_sym *sym;
|
||||
struct pic_object *obj;
|
||||
size_t total = 0, inuse = 0;
|
||||
|
|
|
@ -104,7 +104,7 @@ struct pic_state {
|
|||
|
||||
pic_value features;
|
||||
|
||||
khash_t(s) syms; /* name to symbol */
|
||||
khash_t(s) oblist; /* string to symbol */
|
||||
int ucnt;
|
||||
struct pic_reg *globals;
|
||||
struct pic_reg *macros;
|
||||
|
|
|
@ -252,7 +252,7 @@ pic_open(pic_allocf allocf, void *userdata)
|
|||
pic->heap = pic_heap_open(pic);
|
||||
|
||||
/* symbol table */
|
||||
kh_init(s, &pic->syms);
|
||||
kh_init(s, &pic->oblist);
|
||||
|
||||
/* unique symbol count */
|
||||
pic->ucnt = 0;
|
||||
|
@ -376,7 +376,7 @@ pic_open(pic_allocf allocf, void *userdata)
|
|||
void
|
||||
pic_close(pic_state *pic)
|
||||
{
|
||||
khash_t(s) *h = &pic->syms;
|
||||
khash_t(s) *h = &pic->oblist;
|
||||
pic_allocf allocf = pic->allocf;
|
||||
|
||||
/* clear out root objects */
|
||||
|
|
|
@ -12,7 +12,7 @@ KHASH_DEFINE(s, pic_str *, pic_sym *, kh_pic_str_hash, kh_pic_str_cmp)
|
|||
pic_sym *
|
||||
pic_intern(pic_state *pic, pic_str *str)
|
||||
{
|
||||
khash_t(s) *h = &pic->syms;
|
||||
khash_t(s) *h = &pic->oblist;
|
||||
pic_sym *sym;
|
||||
khiter_t it;
|
||||
int ret;
|
||||
|
|
Loading…
Reference in New Issue