[Bug #21712] Allow .() call for command with block

This commit allows codes like `a b do end.()` and `a b do end&.()`.

Author: yui-knk

parse.y

@@ -5235,6 +5235,12 @@ block_call	: command do_block
                         $$ = new_command_qcall(p, $2, $1, $3, $4, $5, &@3, &@$);
                     /*% ripper: method_add_block!(command_call!($:1, $:2, $:3, $:4), $:5) %*/
                     }
+                | block_call call_op2 paren_args
+                    {
+                        $$ = new_qcall(p, $2, $1, idCall, $3, &@2, &@$);
+                        nd_set_line($$, @2.end_pos.lineno);
+                    /*% ripper: method_add_arg!(call!($:1, $:2, ID2VAL(idCall)), $:3) %*/
+                    }
                 ;
 
 method_call	: fcall paren_args

test/ripper/test_parser_events.rb

@@ -480,6 +480,13 @@ def test_call
     assert_equal true, thru_call
     assert_equal "[call(vcall(foo),.,call,[])]", tree
 
+    thru_call = false
+    assert_nothing_raised {
+      tree = parse("a b do end.()", :on_call) {thru_call = true}
+    }
+    assert_equal true, thru_call
+    assert_equal "[call(command(a,[vcall(b)],&do_block(,bodystmt([void()]))),.,call,[])]", tree
+
     thru_call = false
     assert_nothing_raised {
       tree = parse("self::foo", :on_call) {thru_call = true}

test/ruby/test_parse.rb

@@ -352,6 +352,21 @@ def test_call_method
     assert_equal("foobar", b)
   end
 
+  def test_call_command
+    a = b = nil
+    o = Object.new
+    def o.m(*arg); proc {|a| arg.join + a }; end
+
+    assert_nothing_raised do
+      o.instance_eval <<-END, __FILE__, __LINE__+1
+        a = o.m "foo", "bar" do end.("buz")
+        b = o.m "foo", "bar" do end::("buz")
+      END
+    end
+    assert_equal("foobarbuz", a)
+    assert_equal("foobarbuz", b)
+  end
+
   def test_xstring
     assert_raise(Errno::ENOENT) do
       eval("``")