Refactor for_body func

This commit is contained in:
Jun Hiroe
2014-10-28 23:28:37 +09:00
parent f4260a851a
commit ad77ed8bf3
+1 -2
View File
@@ -571,12 +571,11 @@ for_body(codegen_scope *s, node *tree)
/* generate loop variable */
n2 = tree->car;
genop(s, MKOP_Ax(OP_ENTER, 0x40000));
if (n2->car && !n2->car->cdr && !n2->cdr) {
genop(s, MKOP_Ax(OP_ENTER, 0x40000));
gen_assignment(s, n2->car->car, 1, NOVAL);
}
else {
genop(s, MKOP_Ax(OP_ENTER, 0x40000));
gen_vmassignment(s, n2, 1, VAL);
}
codegen(s, tree->cdr->cdr->car, VAL);