From a180460635f49ca955e2aa3d01642b1d30b049af Mon Sep 17 00:00:00 2001
From: Yukihiro Matz Matsumoto <matz@ruby-lang.org>
Date: Sun, 13 Jan 2013 00:51:44 +0900
Subject: eliminate unused hash expression more aggresively

---
 src/codegen.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src/codegen.c')

diff --git a/src/codegen.c b/src/codegen.c
index 7f80e9f77..7f1823ba6 100644
--- a/src/codegen.c
+++ b/src/codegen.c
@@ -1327,13 +1327,13 @@ codegen(codegen_scope *s, node *tree, int val)
       int len = 0;
 
       while (tree) {
-        codegen(s, tree->car->car, VAL);
-        codegen(s, tree->car->cdr, VAL);
+        codegen(s, tree->car->car, val);
+        codegen(s, tree->car->cdr, val);
         len++;
         tree = tree->cdr;
       }
-      pop_n(len*2);
       if (val) {
+	pop_n(len*2);
         genop(s, MKOP_ABC(OP_HASH, cursp(), cursp(), len));
         push();
       }
-- 
cgit v1.2.3