admin/mruby-mruby
1
0
Fork 0
mirror of https://github.com/mruby/mruby synced 2026-06-08 16:11:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

should splat and iterate elements when "*ary" speficied in the case-when clause; close #1627

Browse Source
This commit is contained in:
Yukihiro "Matz" Matsumoto
2014-01-04 11:25:53 +09:00
parent 2122cf48db
commit 925137475c
2 changed files with 31 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/codegen.c
+14 -2
View File
@@ -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: