summaryrefslogtreecommitdiffhomepage
path: root/src/codegen.c
diff options
context:
space:
mode:
authorYukihiro "Matz" Matsumoto <[email protected]>2014-01-04 11:25:53 +0900
committerYukihiro "Matz" Matsumoto <[email protected]>2014-01-04 11:25:53 +0900
commit925137475cc43cfb4b09aa757251508c29ca349f (patch)
tree4b9b484e319856380f0fa20ee4ef7c3621aa2370 /src/codegen.c
parent2122cf48dbba4cc363c5c8d26a844f1bc55134d6 (diff)
downloadmruby-925137475cc43cfb4b09aa757251508c29ca349f.tar.gz
mruby-925137475cc43cfb4b09aa757251508c29ca349f.zip
should splat and iterate elements when "*ary" speficied in the case-when clause; close #1627
Diffstat (limited to 'src/codegen.c')
-rw-r--r--src/codegen.c16
1 files changed, 14 insertions, 2 deletions
diff --git a/src/codegen.c b/src/codegen.c
index d0ec12bac..83018c627 100644
--- a/src/codegen.c
+++ b/src/codegen.c
@@ -1386,7 +1386,12 @@ codegen(codegen_scope *s, node *tree, int val)
if (head) {
genop(s, MKOP_AB(OP_MOVE, cursp(), head));
pop();
- genop(s, MKOP_ABC(OP_SEND, cursp(), new_msym(s, mrb_intern_lit(s->mrb, "===")), 1));
+ if ((intptr_t)n->car->car == NODE_SPLAT) {
+ genop(s, MKOP_ABC(OP_SEND, cursp(), new_msym(s, mrb_intern_lit(s->mrb, "__case_eqq")), 1));
+ }
+ else {
+ genop(s, MKOP_ABC(OP_SEND, cursp(), new_msym(s, mrb_intern_lit(s->mrb, "===")), 1));
+ }
}
else {
pop();
@@ -1510,7 +1515,14 @@ codegen(codegen_scope *s, node *tree, int val)
break;
case NODE_SPLAT:
- codegen(s, tree, VAL);
+ {
+ int idx = new_msym(s, mrb_intern_lit(s->mrb, "to_a"));
+
+ codegen(s, tree, VAL);
+ pop();
+ genop(s, MKOP_ABC(OP_SEND, cursp(), idx, 0));
+ push();
+ }
break;
case NODE_ASGN: