* 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/branches/ruby_1_8@16666 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

2 files changed, 6 insertions, 0 deletions

diff --git a/ChangeLog b/ChangeLog
index 0101772944..bad38aaf3e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Wed May 28 16:53:39 2008  Akinori MUSHA  <knu@iDaemons.org>
+
+	* array.c (rb_ary_slice_bang): Call rb_ary_modify_check() at the
+	  beginning. [rubyspec]
+
 Wed May 28 16:12:44 2008  Akinori MUSHA  <knu@iDaemons.org>
 
 	* lib/webrick/httpservlet/cgihandler.rb (WEBrick::HTTPServlet::CGIHandler#do_GET):
diff --git a/array.c b/array.c
index fcbb7d4c30..bcdd29abf1 100644
--- a/array.c
+++ b/array.c
@@ -2080,6 +2080,7 @@ rb_ary_slice_bang(argc, argv, 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);