Add Ractor support

Author: mrkn

ext/numo/narray/gen/tmpl/alloc_func.c

@@ -87,7 +87,7 @@ static const rb_data_type_t <%=type_name%>_data_type = {
     {0, <%=type_name%>_free, <%=type_name%>_memsize,},
     &na_data_type,
     &<%=type_name%>_info,
-    0, // flags
+    RUBY_TYPED_FROZEN_SHAREABLE, // flags
 };
 
 <% end %>

ext/numo/narray/gen/tmpl/init_class.c

@@ -14,6 +14,7 @@
     rb_hash_aset(hCast, rb_cArray,   cT);
     <% for x in upcast %>
     <%= x %><% end %>
+    rb_obj_freeze(hCast);
 
     <% @children.each do |m| %>
     <%= m.init_def %><% end %>

ext/numo/narray/narray.c

@@ -1989,6 +1989,10 @@ na_equal(VALUE self, volatile VALUE other)
 void
 Init_narray()
 {
+#ifdef HAVE_RB_EXT_RACTOR_SAFE
+    rb_ext_ractor_safe(true);
+#endif
+
     mNumo = rb_define_module("Numo");
 
     /*

ext/numo/narray/numo/narray.h

@@ -450,6 +450,12 @@ typedef unsigned int BIT_DIGIT;
 #include "numo/ndloop.h"
 #include "numo/intern.h"
 
+// for Ractor support code
+#ifndef HAVE_RB_EXT_RACTOR_SAFE
+#   undef RUBY_TYPED_FROZEN_SHAREABLE
+#   define RUBY_TYPED_FROZEN_SHAREABLE 0
+#endif
+
 #if defined(__cplusplus)
 #if 0
 { /* satisfy cc-mode */

test/ractor_test.rb

@@ -24,7 +24,8 @@ def test_frozen(data)
       [ary2, ary2 * 10]
     end
     ary2, res = r.take
-    assert_same(ary1, ary2)
+    assert_equal((dtype != Numo::RObject),
+                 ary1.equal?(ary2))
     assert_equal(ary1*10, res)
   end