conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

s/senv->name/senv->renames/g

This commit is contained in:
Yuichi Nishiwaki 2014-03-25 14:21:23 +09:00
parent 56840b326e
commit 88a7d1f2b9
3 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
include/picrin/macro.h
View File

@ -11,7 +11,7 @@ extern "C" {
struct pic_senv { struct pic_senv {
PIC_OBJECT_HEADER PIC_OBJECT_HEADER
xhash *name; xhash *renames;
struct pic_senv *up; struct pic_senv *up;
}; };

2
src/gc.c
View File

@ -604,7 +604,7 @@ gc_finalize_object(pic_state *pic, struct pic_object *obj)
} }
case PIC_TT_SENV: { case PIC_TT_SENV: {
struct pic_senv *senv = (struct pic_senv *)obj; struct pic_senv *senv = (struct pic_senv *)obj;
xh_destroy(senv->name); xh_destroy(senv->renames);
break; break;
} }
case PIC_TT_MACRO: { case PIC_TT_MACRO: {

6
src/macro.c
View File

@ -25,7 +25,7 @@ pic_put_rename(pic_state *pic, struct pic_senv *senv, pic_sym sym, pic_sym renam
{ {
UNUSED(pic); UNUSED(pic);
xh_put_int(senv->name, sym, rename); xh_put_int(senv->renames, sym, rename);
} }
pic_sym pic_sym
@ -35,7 +35,7 @@ pic_find_rename(pic_state *pic, struct pic_senv *senv, pic_sym sym)
UNUSED(pic); UNUSED(pic);
if ((e = xh_get_int(senv->name, sym)) == NULL) { if ((e = xh_get_int(senv->renames, sym)) == NULL) {
return 0; return 0;
} }
return e->val; return e->val;
@ -51,7 +51,7 @@ senv_new(pic_state *pic, struct pic_senv *up)
senv = (struct pic_senv *)pic_obj_alloc(pic, sizeof(struct pic_senv), PIC_TT_SENV); senv = (struct pic_senv *)pic_obj_alloc(pic, sizeof(struct pic_senv), PIC_TT_SENV);
senv->up = up; senv->up = up;
senv->name = xh_new_int(); senv->renames = xh_new_int();
return senv; return senv;
} }