Add C API rb_proc_call_kw function

Author: andrykonchin

spec/ruby/optional/capi/ext/proc_spec.c

@@ -76,6 +76,10 @@ VALUE proc_spec_rb_proc_call(VALUE self, VALUE prc, VALUE args) {
   return rb_proc_call(prc, args);
 }
 
+VALUE proc_spec_rb_proc_call_kw(VALUE self, VALUE prc, VALUE args) {
+  return rb_proc_call_kw(prc, args, RB_PASS_KEYWORDS);
+}
+
 VALUE proc_spec_rb_proc_call_with_block(VALUE self, VALUE prc, VALUE args, VALUE block) {
   return rb_proc_call_with_block(prc, RARRAY_LENINT(args), RARRAY_PTR(args), block);
 }
@@ -127,6 +131,7 @@ void Init_proc_spec(void) {
   rb_define_method(cls, "rb_proc_new_block_given_p", proc_spec_rb_proc_new_block_given_p, 0);
   rb_define_method(cls, "rb_proc_arity", proc_spec_rb_proc_arity, 1);
   rb_define_method(cls, "rb_proc_call", proc_spec_rb_proc_call, 2);
+  rb_define_method(cls, "rb_proc_call_kw", proc_spec_rb_proc_call_kw, 2);
   rb_define_method(cls, "rb_proc_call_with_block", proc_spec_rb_proc_call_with_block, 3);
   rb_define_method(cls, "rb_Proc_new", proc_spec_rb_Proc_new, 1);
   rb_define_method(cls, "rb_obj_is_proc", proc_spec_rb_obj_is_proc, 1);

spec/ruby/optional/capi/proc_spec.rb

@@ -82,6 +82,25 @@
     end
   end
 
+  describe "rb_proc_call_kw" do
+    it "passes keyword arguments to the proc" do
+      prc = proc { |*args, **kw| [args, kw] }
+
+      @p.rb_proc_call_kw(prc, [{}]).should == [[], {}]
+      @p.rb_proc_call_kw(prc, [{a: 1}]).should == [[], {a: 1}]
+      @p.rb_proc_call_kw(prc, [{b: 2}, {a: 1}]).should == [[{b: 2}], {a: 1}]
+      @p.rb_proc_call_kw(prc, [{b: 2}, {}]).should == [[{b: 2}], {}]
+    end
+
+    it "raises TypeError if the last argument is not a Hash" do
+      prc = proc { |*args, **kwargs| [args, kw] }
+
+      -> {
+        @p.rb_proc_call_kw(prc, [42])
+      }.should raise_error(TypeError, 'no implicit conversion of Integer into Hash')
+    end
+  end
+
   describe "rb_proc_call_with_block" do
     it "calls the Proc and passes arguments and a block" do
       prc = Proc.new { |a, b, &block| block.call(a * b) }

src/main/c/cext/proc.c

@@ -19,6 +19,10 @@ VALUE rb_proc_call(VALUE self, VALUE args) {
   return RUBY_CEXT_INVOKE("rb_proc_call", self, args);
 }
 
+VALUE rb_proc_call_kw(VALUE recv, VALUE args, int kw_splat) {
+  return rb_funcallv_kw(recv, rb_intern("call"), RARRAY_LENINT(args), RARRAY_PTR(args), kw_splat);
+}
+
 VALUE rb_proc_call_with_block(VALUE recv, int argc, const VALUE *argv, VALUE proc) {
   return rb_funcall_with_block(recv, rb_intern("call"), argc, argv, proc);
 }