rename local variables
This commit is contained in:
parent
f3e2321679
commit
2126f5b453
|
@ -1050,14 +1050,14 @@ static struct pic_irep *
|
||||||
codegen_lambda(codegen_state *state, pic_value obj)
|
codegen_lambda(codegen_state *state, pic_value obj)
|
||||||
{
|
{
|
||||||
pic_state *pic = state->pic;
|
pic_state *pic = state->pic;
|
||||||
pic_value args, defs, body;
|
pic_value args, decls, body;
|
||||||
|
|
||||||
args = pic_list_ref(pic, obj, 1);
|
args = pic_list_ref(pic, obj, 1);
|
||||||
defs = pic_cdr(pic, pic_list_ref(pic, obj, 2));
|
decls = pic_cdr(pic, pic_list_ref(pic, obj, 2));
|
||||||
body = pic_list_ref(pic, obj, 3);
|
body = pic_list_ref(pic, obj, 3);
|
||||||
|
|
||||||
/* inner environment */
|
/* inner environment */
|
||||||
push_codegen_context(state, args, defs);
|
push_codegen_context(state, args, decls);
|
||||||
{
|
{
|
||||||
/* body */
|
/* body */
|
||||||
codegen(state, body);
|
codegen(state, body);
|
||||||
|
|
Loading…
Reference in New Issue