From 67d54f209d28019cc5d8b332706dd9950b56bdc7 Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 15 Nov 2004 16:45:03 +0000
Subject: * array.c (rb_ary_update): pedantic check to detect   rb_ary_to_ary()
 to modify the receiver.  [ruby-dev:24861]

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

(limited to 'array.c')

diff --git a/array.c b/array.c
index 8b9c62063a..3e55ca4e3b 100644
--- a/array.c
+++ b/array.c
@@ -1090,7 +1090,6 @@ rb_ary_update(ary, beg, len, rpl)
 	len = RARRAY(ary)->len - beg;
     }
 
-    rb_ary_modify(ary);
     if (rpl == Qundef) {
 	rlen = 0;
     }
@@ -1098,6 +1097,7 @@ rb_ary_update(ary, beg, len, rpl)
 	rpl = rb_ary_to_ary(rpl);
 	rlen = RARRAY(rpl)->len;
     }
+    rb_ary_modify(ary);
 
     if (beg >= RARRAY(ary)->len) {
 	len = beg + rlen;
-- 
cgit v1.2.3