From fbf3e22a3d4c365b0a4ce2f4349bcffd9d182850 Mon Sep 17 00:00:00 2001
From: knu <knu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Wed, 28 May 2008 07:52:34 +0000
Subject: * array.c (rb_ary_slice_bang): Call rb_ary_modify_check() at the  
 beginning. [rubyspec]

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@16665 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 array.c | 1 +
 1 file changed, 1 insertion(+)

(limited to 'array.c')

diff --git a/array.c b/array.c
index 5dd172c157..39d2fbe931 100644
--- a/array.c
+++ b/array.c
@@ -1805,6 +1805,7 @@ rb_ary_slice_bang(int argc, VALUE *argv, VALUE ary)
     VALUE arg1, arg2;
     long pos, len, orig_len;
 
+    rb_ary_modify_check(ary);
     if (rb_scan_args(argc, argv, "11", &arg1, &arg2) == 2) {
 	pos = NUM2LONG(arg1);
 	len = NUM2LONG(arg2);
-- 
cgit v1.2.3