From af03812877c914de787e70735eb89084434b21f1 Mon Sep 17 00:00:00 2001
From: "Yukihiro \"Matz\" Matsumoto" <matz@ruby-lang.org>
Date: Thu, 31 Oct 2013 23:34:08 +0900
Subject: add mrb_ary_modify(mrb,a); you have to ensure mrb_value a to be an
 array; ref #1554

---
 src/array.c | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'src/array.c')

diff --git a/src/array.c b/src/array.c
index 526cf4973..705aece07 100644
--- a/src/array.c
+++ b/src/array.c
@@ -138,6 +138,16 @@ ary_modify(mrb_state *mrb, struct RArray *a)
   }
 }
 
+void
+mrb_ary_modify(mrb_state *mrb, mrb_value ary)
+{
+  struct RArray *a;
+
+  a = mrb_ary_ptr(ary);
+  mrb_write_barrier(mrb, (struct RBasic*)a);
+  ary_modify(mrb, a);
+}
+
 static void
 ary_make_shared(mrb_state *mrb, struct RArray *a)
 {
-- 
cgit v1.2.3