Rightward-assign by ASSOC.

[ruby-bugs:15921]
This commit is contained in:
Yukihiro "Matz" Matsumoto
2020-04-14 23:47:40 +09:00
parent b2398879fa
commit 6e86e290e4
2 changed files with 31 additions and 1 deletions
+22 -1
View File
@@ -1416,7 +1416,7 @@ heredoc_end(parser_state *p)
%type <nd> singleton string string_fragment string_rep string_interp xstring regexp
%type <nd> literal numeric cpath symbol
%type <nd> top_compstmt top_stmts top_stmt
%type <nd> top_compstmt top_stmts top_stmt rassign
%type <nd> bodystmt compstmt stmts stmt expr arg primary command command_call method_call
%type <nd> expr_value arg_rhs primary_value
%type <nd> if_tail opt_else case_body cases opt_rescue exc_list exc_var opt_ensure
@@ -1658,9 +1658,30 @@ stmt : keyword_alias fsym {p->lstate = EXPR_FNAME;} fsym
{
$$ = new_masgn(p, $1, new_array(p, $3));
}
| rassign
| expr
;
rassign : arg tASSOC lhs
{
void_expr_error(p, $1);
$$ = new_asgn(p, $3, $1);
}
| arg tASSOC mlhs
{
void_expr_error(p, $1);
$$ = new_masgn(p, $3, $1);
}
| rassign tASSOC lhs
{
$$ = new_asgn(p, $3, $1);
}
| rassign tASSOC mlhs
{
$$ = new_masgn(p, $3, $1);
}
;
command_asgn : lhs '=' command_rhs
{
$$ = new_asgn(p, $1, $3);
+9
View File
@@ -345,6 +345,15 @@ assert('splat object in assignment') do
assert_equal [2], (a = *o)
end
assert('right-ward assignment') do
1 => a
assert_equal(1, a)
13.divmod(5) => a,b
assert_equal([2,3], [a, b])
13.divmod(5) => a,b => c, d
assert_equal([2,3,2,3], [a, b, c, d])
end
assert('splat object in case statement') do
o = Object.new
def o.to_a