summaryrefslogtreecommitdiffhomepage
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/codegen.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/codegen.c b/src/codegen.c
index ffa13d647..0451bb996 100644
--- a/src/codegen.c
+++ b/src/codegen.c
@@ -1100,7 +1100,7 @@ codegen(codegen_scope *s, node *tree, int val)
codegen(s, tree->cdr->car, val);
if (e) {
- if (val) pop();
+ if (val && tree->cdr->car) pop();
pos2 = new_label(s);
genop(s, MKOP_sBx(OP_JMP, 0));
dispatch(s, pos1);