Feature #11104 ยป 0001-support-ES6-like-hash-literals.patch
parse.y | ||
---|---|---|
static NODE *reg_named_capture_assign_gen(struct parser_params* parser, VALUE regexp, NODE *match);
|
||
#define reg_named_capture_assign(regexp,match) reg_named_capture_assign_gen(parser,(regexp),(match))
|
||
static NODE *assoc_concat_gen(struct parser_params*,NODE*,NODE*);
|
||
#define assoc_concat(assocs,tail) assoc_concat_gen(parser,(assocs),(tail))
|
||
static ID var_to_assoc_key(ID);
|
||
#define get_id(id) (id)
|
||
#define get_value(val) (val)
|
||
#else
|
||
... | ... | |
%type <node> command_asgn mrhs mrhs_arg superclass block_call block_command
|
||
%type <node> f_block_optarg f_block_opt
|
||
%type <node> f_arglist f_args f_arg f_arg_item f_optarg f_marg f_marg_list f_margs
|
||
%type <node> assoc_list assocs assoc undef_list backref string_dvar for_var
|
||
%type <node> assoc_list assoc_items assoc_item assocs assoc undef_list backref string_dvar for_var
|
||
%type <node> block_param opt_block_param block_param_def f_opt
|
||
%type <node> f_kwarg f_kw f_block_kwarg f_block_kw
|
||
%type <node> bv_decls opt_bv_decl bvar
|
||
... | ... | |
;
|
||
assoc_list : none
|
||
| assocs trailer
|
||
| assoc_items trailer
|
||
{
|
||
/*%%%*/
|
||
$$ = $1;
|
||
... | ... | |
}
|
||
;
|
||
assoc_items : assoc_item
|
||
/*%c%*/
|
||
/*%c
|
||
{
|
||
$$ = rb_ary_new3(1, $1);
|
||
}
|
||
%*/
|
||
| assoc_items ',' assoc_item
|
||
{
|
||
/*%%%*/
|
||
$$ = assoc_concat($1, $3);
|
||
/*%
|
||
$$ = rb_ary_push($1, $3);
|
||
%*/
|
||
}
|
||
;
|
||
assoc_item : assoc
|
||
| user_variable
|
||
{
|
||
/*%%%*/
|
||
ID k = var_to_assoc_key($1);
|
||
NODE *key, *val;
|
||
key = NEW_LIT(ID2SYM(k));
|
||
if (!(val = gettable($1))) val = NEW_BEGIN(0);
|
||
$$ = list_append(NEW_LIST(key), val);
|
||
/*%
|
||
$$ = dispatch2(assoc_new, $1, id_is_var(get_id($1)) ? dispatch1(var_ref, $1) : dispatch1(vcall, $1));
|
||
%*/
|
||
}
|
||
;
|
||
assocs : assoc
|
||
/*%c%*/
|
||
/*%c
|
||
... | ... | |
| assocs ',' assoc
|
||
{
|
||
/*%%%*/
|
||
NODE *assocs = $1;
|
||
NODE *tail = $3;
|
||
if (!assocs) {
|
||
assocs = tail;
|
||
}
|
||
else if (tail) {
|
||
if (assocs->nd_head &&
|
||
!tail->nd_head && nd_type(tail->nd_next) == NODE_ARRAY &&
|
||
nd_type(tail->nd_next->nd_head) == NODE_HASH) {
|
||
/* DSTAR */
|
||
tail = tail->nd_next->nd_head->nd_head;
|
||
}
|
||
assocs = list_concat(assocs, tail);
|
||
}
|
||
$$ = assocs;
|
||
$$ = assoc_concat($1, $3);
|
||
/*%
|
||
$$ = rb_ary_push($1, $3);
|
||
%*/
|
||
... | ... | |
return re;
|
||
}
|
||
static NODE *
|
||
assoc_concat_gen(struct parser_params *parser, NODE *assocs, NODE *tail)
|
||
{
|
||
if (!assocs) {
|
||
assocs = tail;
|
||
}
|
||
else if (tail) {
|
||
if (assocs->nd_head &&
|
||
!tail->nd_head && nd_type(tail->nd_next) == NODE_ARRAY &&
|
||
nd_type(tail->nd_next->nd_head) == NODE_HASH) {
|
||
/* DSTAR */
|
||
tail = tail->nd_next->nd_head->nd_head;
|
||
}
|
||
assocs = list_concat(assocs, tail);
|
||
}
|
||
return assocs;
|
||
}
|
||
static ID var_to_assoc_key(ID var)
|
||
{
|
||
switch (id_type(var)) {
|
||
case ID_LOCAL:
|
||
case ID_CONST:
|
||
return var;
|
||
default: {
|
||
const char *name = rb_id2name(var);
|
||
while (*name == '$' || *name == '@')
|
||
name++;
|
||
return rb_intern(name);
|
||
}
|
||
}
|
||
}
|
||
NODE*
|
||
rb_parser_append_print(VALUE vparser, NODE *node)
|
||
{
|