- ruby31.y: emit hash labels that are local variables as locals if va…

…lue is omitted.

doc/AST_FORMAT.md

@@ -266,6 +266,30 @@ Format:
  ~~~~~~~~~~ expression (pair)
 ~~~
 
+#### With local variable
+
+Format:
+
+~~~
+(pair (sym :foo) (lvar :foo))
+"{foo:}"
+     ^ operator (pair)
+  ~~~ expression (sym)
+  ~~~ expression (lvar)
+~~~
+
+#### With method call
+
+Format:
+
+~~~
+(pair (sym :puts) (send nil :puts))
+"{puts:}"
+      ^ operator (pair)
+  ~~~~ expression (sym)
+  ~~~~ expression (send)
+~~~
+
 #### Plain
 
 Format:

lib/parser/builders/default.rb

@@ -518,6 +518,15 @@ def pair_quoted(begin_t, parts, end_t, value)
       n(:pair, [ key, value ], pair_map)
     end
 
+    def pair_label(key_t)
+      key_l = loc(key_t)
+      value_l = key_l.adjust(end_pos: -1)
+
+      ident = n(:ident, [ value(key_t).to_sym ], Source::Map::Variable.new(value_l))
+      value = accessible(ident)
+      result = pair_keyword(key_t, value)
+    end
+
     def kwsplat(dstar_t, arg)
       n(:kwsplat, [ arg ],
         unary_op_map(dstar_t, arg))

lib/parser/ruby31.y

@@ -3100,8 +3100,7 @@ f_opt_paren_args: f_paren_args
                     }
                 | tLABEL
                     {
-                      value = @builder.call_method(nil, nil, val[0])
-                      result = @builder.pair_keyword(val[0], value)
+                      result = @builder.pair_label(val[0])
                     }
                 | tSTRING_BEG string_contents tLABEL_END arg_value
                     {

test/test_parser.rb

@@ -10073,16 +10073,24 @@ def test_private_endless_method_command_syntax
   def test_value_omission
     assert_parses(
       s(:hash,
-        s(:pair, s(:sym, :a), s(:send, nil, :a)),
-        s(:pair, s(:sym, :b), s(:send, nil, :b))),
-      %q{{a:, b:}},
-      %q{^ begin
-        |       ^ end
-        |  ^ operator (pair)
-        | ~ expression (pair.sym)
-        | ~~ expression (pair.send)
-        | ~~ expression (pair)
-        |~~~~~~~~ expression},
+        s(:pair, s(:sym, :puts), s(:send, nil, :puts))),
+      %q{{puts:}},
+      %q{     ^ operator (pair)
+        | ~~~~ expression (pair.sym)
+        | ~~~~ expression (pair.send)
+        | ~~~~ selector (pair.send)
+        | ~~~~~ expression (pair)},
+      SINCE_3_1)
+
+    assert_parses(
+      s(:hash,
+        s(:pair, s(:sym, :foo), s(:lvar, :foo))),
+      %q{{foo:}},
+      %q{    ^ operator (pair)
+        | ~~~ expression (pair.sym)
+        | ~~~ expression (pair.lvar)
+        | ~~~ name (pair.lvar)
+        | ~~~~ expression (pair)},
       SINCE_3_1)
   end