inline macro_new and add_macro

This commit is contained in:
Yuichi Nishiwaki 2014-04-04 12:58:28 +09:00
parent 845778eefb
commit 4ec8398118
1 changed files with 3 additions and 14 deletions

View File

@ -125,29 +125,18 @@ pic_core_syntactic_env(pic_state *pic)
return senv;
}
static struct pic_macro *
macro_new(pic_state *pic, struct pic_proc *proc, struct pic_senv *mac_env)
static void
define_macro(pic_state *pic, pic_sym rename, struct pic_proc *proc, struct pic_senv *senv)
{
struct pic_macro *mac;
mac = (struct pic_macro *)pic_obj_alloc(pic, sizeof(struct pic_macro), PIC_TT_MACRO);
mac->senv = mac_env;
mac->senv = senv;
mac->proc = proc;
return mac;
}
static void
add_macro(pic_state *pic, pic_sym rename, struct pic_macro *mac)
{
xh_put(&pic->macros, rename, &mac);
}
static void
define_macro(pic_state *pic, pic_sym rename, struct pic_proc *proc, struct pic_senv *senv)
{
add_macro(pic, rename, macro_new(pic, proc, senv));
}
static struct pic_macro *
find_macro(pic_state *pic, pic_sym rename)
{