bugfix: lambda must use new_scope to gen body code

This commit is contained in:
Yuichi Nishiwaki 2013-10-23 15:46:18 +09:00
parent cc025626d5
commit 947ddc45c8
1 changed files with 1 additions and 1 deletions

View File

@ -458,7 +458,7 @@ pic_gen_lambda(pic_state *pic, pic_value obj, struct pic_scope *scope)
/* body */ /* body */
body = pic_cdr(pic, pic_cdr(pic, obj)); body = pic_cdr(pic, pic_cdr(pic, obj));
for (v = body; ! pic_nil_p(v); v = pic_cdr(pic, v)) { for (v = body; ! pic_nil_p(v); v = pic_cdr(pic, v)) {
pic_gen(pic, irep, pic_car(pic, v), scope); pic_gen(pic, irep, pic_car(pic, v), new_scope);
irep->code[irep->clen].insn = OP_POP; irep->code[irep->clen].insn = OP_POP;
irep->clen++; irep->clen++;
} }