Implement rb_gc_impl_during_gc_p

Author: eightbitraptor

gc/mmtk/mmtk.c

@@ -515,8 +515,7 @@ rb_gc_impl_start(void *objspace_ptr, bool full_mark, bool immediate_mark, bool i
 bool
 rb_gc_impl_during_gc_p(void *objspace_ptr)
 {
-    // TODO
-    return false;
+    return mmtk_gc_in_progress_p();
 }
 
 static void

gc/mmtk/mmtk.h

@@ -99,6 +99,8 @@ void mmtk_set_gc_enabled(bool enable);
 
 bool mmtk_gc_enabled_p(void);
 
+bool mmtk_gc_in_progress_p(void);
+
 MMTk_Address mmtk_alloc(MMTk_Mutator *mutator,
                         size_t size,
                         size_t align,

gc/mmtk/src/api.rs

@@ -207,6 +207,11 @@ pub extern "C" fn mmtk_gc_enabled_p() -> bool {
     crate::CONFIGURATION.gc_enabled.load(Ordering::Relaxed)
 }
 
+#[no_mangle]
+pub extern "C" fn mmtk_gc_in_progress_p() -> bool {
+    crate::mmtk().gc_in_progress()
+}
+
 // =============== Object allocation ===============
 
 #[no_mangle]