Implement rb_check_funcall()

Author: eregon

CHANGELOG.md

@@ -30,6 +30,7 @@ Compatibility:
 * Support `Socket.sockaddr_in(port, Socket::INADDR_ANY)` (#3361, @mtortonesi).
 * Implement the `Data` class from Ruby 3.2 (#3039, @moste00, @eregon).
 * Make `Coverage.start` and `Coverage.result` accept parameters (#3149, @mtortonesi, @andrykonchin).
+* Implement `rb_check_funcall()` (@eregon).
 
 Performance:
 

lib/cext/include/truffleruby/truffleruby-abi-version.h

@@ -10,6 +10,6 @@
 // $RUBY_VERSION must be the same as TruffleRuby.LANGUAGE_VERSION.
 // $ABI_NUMBER starts at 1 and is incremented for every ABI-incompatible change.
 
-#define TRUFFLERUBY_ABI_VERSION "3.2.2.9"
+#define TRUFFLERUBY_ABI_VERSION "3.2.2.10"
 
 #endif

lib/truffle/truffle/cext.rb

@@ -1060,6 +1060,10 @@ def rb_funcallv(recv, meth, argv)
     Primitive.send_argv_without_cext_lock(recv, meth, argv, nil)
   end
 
+  def rb_check_funcall(recv, meth, args)
+    Primitive.send_without_cext_lock(Truffle::Type, :check_funcall, [recv, meth, args], nil)
+  end
+
   def rb_funcallv_keywords(recv, meth, argv)
     Primitive.send_argv_keywords_without_cext_lock(recv, meth, argv, nil)
   end

src/main/c/cext/call.c

@@ -49,6 +49,13 @@ VALUE rb_funcallv_public(VALUE object, ID name, int args_count, const VALUE *arg
     polyglot_from_VALUE_array(args, args_count)));
 }
 
+VALUE rb_check_funcall(VALUE object, ID name, int args_count, const VALUE *args) {
+  return rb_tr_wrap(polyglot_invoke(RUBY_CEXT, "rb_check_funcall",
+    rb_tr_unwrap(object),
+    rb_tr_unwrap(ID2SYM(name)),
+    rb_tr_unwrap(rb_ary_new_from_values(args_count, args))));
+}
+
 VALUE rb_apply(VALUE object, ID name, VALUE args) {
   return RUBY_CEXT_INVOKE("rb_apply", object, ID2SYM(name), args);
 }