OP_LAMBDA generation should honor VAL/NOVAL; fix #3580

parent db47ae5d
...@@ -1383,7 +1383,7 @@ codegen(codegen_scope *s, node *tree, int val) ...@@ -1383,7 +1383,7 @@ codegen(codegen_scope *s, node *tree, int val)
break; break;
case NODE_LAMBDA: case NODE_LAMBDA:
{ if (val) {
int idx = lambda_body(s, tree, 1); int idx = lambda_body(s, tree, 1);
genop(s, MKOP_Abc(OP_LAMBDA, cursp(), idx, OP_L_LAMBDA)); genop(s, MKOP_Abc(OP_LAMBDA, cursp(), idx, OP_L_LAMBDA));
...@@ -1392,7 +1392,7 @@ codegen(codegen_scope *s, node *tree, int val) ...@@ -1392,7 +1392,7 @@ codegen(codegen_scope *s, node *tree, int val)
break; break;
case NODE_BLOCK: case NODE_BLOCK:
{ if (val) {
int idx = lambda_body(s, tree, 1); int idx = lambda_body(s, tree, 1);
genop(s, MKOP_Abc(OP_LAMBDA, cursp(), idx, OP_L_BLOCK)); genop(s, MKOP_Abc(OP_LAMBDA, cursp(), idx, OP_L_BLOCK));
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment