From 1a7825686111ac49e2a8ef020e0eceb4f8f4258d Mon Sep 17 00:00:00 2001
From: nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 2 Oct 2009 17:49:52 +0000
Subject: [PATCH] * array.c (ary_make_shared): should count frozen array
 itself.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@25197 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog | 4 ++--
 array.c   | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 30b590859c..8d07fef24c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,6 @@
-Sat Oct  3 02:48:17 2009  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+Sat Oct  3 02:49:50 2009  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 
-	* lib/rake: updated to rake code to rake-0.8.7 source code base.
+	* array.c (ary_make_shared): should count frozen array itself.
 
 Sat Oct  3 01:01:20 2009  NARUSE, Yui  <naruse@ruby-lang.org>
 
diff --git a/array.c b/array.c
index 55904ddcdd..f1844b0fc6 100644
--- a/array.c
+++ b/array.c
@@ -418,7 +418,7 @@ ary_make_shared(VALUE ary)
     else if (OBJ_FROZEN(ary)) {
 	ary_resize_capa(ary, ARY_HEAP_LEN(ary));
 	FL_SET_SHARED_ROOT(ary);
-	ARY_SET_SHARED_NUM(ary, 0);
+	ARY_SET_SHARED_NUM(ary, 1);
 	return ary;
     }
     else {