kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

compile.c: just insert

Browse source 
* compile.c (compile_massign_lhs): just insert topn insn instead
  of popping and adding.  [Feature #11537]

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@52233 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nobu 2015-10-23 01:47:08 +00:00
parent 418fa65d1a
commit 7e730322ee
1 changed files with 18 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

24
compile.c
View file

@ -756,6 +756,20 @@ INSERT_ELEM_NEXT(LINK_ELEMENT *elem1, LINK_ELEMENT *elem2)
} }
} }
/*
* elem1, elemX => elemX, elem2, elem1
*/
static void
INSERT_ELEM_PREV(LINK_ELEMENT *elem1, LINK_ELEMENT *elem2)
{
elem2->prev = elem1->prev;
elem2->next = elem1;
elem1->prev = elem2;
if (elem2->prev) {
elem2->prev->next = elem2;
}
}
/* /*
* elemX, elem1, elemY => elemX, elem2, elemY * elemX, elem1, elemY => elemX, elem2, elemY
*/ */
@ -2739,22 +2753,20 @@ compile_massign_lhs(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE *node)
{ {
switch (nd_type(node)) { switch (nd_type(node)) {
case NODE_ATTRASGN: { case NODE_ATTRASGN: {
INSN *iobj; INSN *iobj, *topdup;
struct rb_call_info *ci; struct rb_call_info *ci;
VALUE dupidx; VALUE dupidx;
COMPILE_POPED(ret, "masgn lhs (NODE_ATTRASGN)", node); COMPILE_POPED(ret, "masgn lhs (NODE_ATTRASGN)", node);
POP_ELEMENT(ret); /* pop pop insn */ iobj = (INSN *)get_prev_insn((INSN *)LAST_ELEMENT(ret)); /* send insn */
iobj = (INSN *)POP_ELEMENT(ret); /* pop send insn */
ci = (struct rb_call_info *)iobj->operands[0]; ci = (struct rb_call_info *)iobj->operands[0];
ci->orig_argc += 1; ci->orig_argc += 1;
dupidx = INT2FIX(ci->orig_argc); dupidx = INT2FIX(ci->orig_argc);
ADD_INSN1(ret, nd_line(node), topn, dupidx); topdup = new_insn_body(iseq, nd_line(node), BIN(topn), 1, dupidx);
ADD_ELEM(ret, (LINK_ELEMENT *)iobj); INSERT_ELEM_PREV(&iobj->link, &topdup->link);
ADD_INSN(ret, nd_line(node), pop); /* result */ ADD_INSN(ret, nd_line(node), pop); /* result */
ADD_INSN(ret, nd_line(node), pop); /* rhs */
break; break;
} }
case NODE_MASGN: { case NODE_MASGN: {