From 5002594a06b7f2ac22eea5a791efd0523a16377d Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 25 Sep 2006 22:58:13 +0000
Subject: * array.c (rb_ary_shift): should not move memory region if array  
 body is shared.  a patch from Kent Sibilev <ksruby at gmail.com>.  
 [ruby-core:08922]

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@11024 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 73f55504a..4896ed24f 100644
--- a/array.c
+++ b/array.c
@@ -578,7 +578,7 @@ rb_ary_shift(VALUE ary)
     rb_ary_modify_check(ary);
     if (RARRAY_LEN(ary) == 0) return Qnil;
     top = RARRAY_PTR(ary)[0];
-    if (RARRAY_LEN(ary) < ARY_DEFAULT_SIZE) {
+    if (RARRAY_LEN(ary) < ARY_DEFAULT_SIZE && !FL_TEST(ary, ELTS_SHARED)) {
 	MEMMOVE(RARRAY_PTR(ary), RARRAY_PTR(ary)+1, VALUE, RARRAY_LEN(ary));
 	ARY_SET_LEN(ary, RARRAY_LEN(ary)-1);
     }
-- 
cgit