Add rb_io_close_p function

CHANGELOG.md

@@ -27,6 +27,7 @@ Compatibility:
 * Add `rb_gc_mark_locations()` (#3704, @andrykonchin).
 * Implement `rb_str_format()` (#3716, @andrykonchin).
 * Add `IO#{pread, pwrite}` methods (#3718, @andrykonchin).
+* Add `rb_io_closed_p()` (#3681, @andrykonchin).
 
 Performance:
 

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

@@ -20,6 +20,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.3.5.4"
+#define TRUFFLERUBY_ABI_VERSION "3.3.5.5"
 
 #endif

lib/truffle/truffle/cext.rb

@@ -2367,6 +2367,10 @@ def rb_io_path(io)
     io.instance_variable_get(:@path)
   end
 
+  def rb_io_closed_p(io)
+    io.closed?
+  end
+
   def rb_tr_io_pointer(io)
     Primitive.object_hidden_var_get(io, RB_IO_STRUCT)
   end

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

@@ -371,6 +371,10 @@ static VALUE io_spec_rb_io_mode(VALUE self, VALUE io) {
 static VALUE io_spec_rb_io_path(VALUE self, VALUE io) {
   return rb_io_path(io);
 }
+
+static VALUE io_spec_rb_io_closed_p(VALUE self, VALUE io) {
+  return rb_io_closed_p(io);
+}
 #endif
 
 void Init_io_spec(void) {
@@ -409,6 +413,7 @@ void Init_io_spec(void) {
 #if defined(RUBY_VERSION_IS_3_3) || defined(TRUFFLERUBY)
   rb_define_method(cls, "rb_io_mode", io_spec_rb_io_mode, 1);
   rb_define_method(cls, "rb_io_path", io_spec_rb_io_path, 1);
+  rb_define_method(cls, "rb_io_closed_p", io_spec_rb_io_closed_p, 1);
 #endif
 }
 

spec/ruby/optional/capi/io_spec.rb

@@ -516,6 +516,20 @@
         @o.rb_io_path(@rw_io).should == @name
       end
     end
+
+    describe "rb_io_closed_p" do
+      it "returns true when io is not closed" do
+        @o.rb_io_closed_p(@r_io).should == false
+        @r_io.closed?.should == false
+      end
+
+      it "returns false when io is closed" do
+        @r_io.close
+
+        @o.rb_io_closed_p(@r_io).should == true
+        @r_io.closed?.should == true
+      end
+    end
   end
 
   ruby_version_is "3.4" do

src/main/c/cext/io.c

@@ -43,6 +43,10 @@ VALUE rb_io_path(VALUE io) {
   return RUBY_CEXT_INVOKE("rb_io_path", io);
 }
 
+VALUE rb_io_closed_p(VALUE io) {
+  return RUBY_CEXT_INVOKE("rb_io_closed_p", io);
+}
+
 static RFile_and_rb_io_t* get_RFile_and_rb_io_t(VALUE io) {
   RFile_and_rb_io_t* pointer = RUBY_CEXT_INVOKE_NO_WRAP("rb_tr_io_pointer", io);
   if (!polyglot_is_null(pointer)) {