From f8c8a38d30f6e23211f7ab1ca11b84d1ab85972f Mon Sep 17 00:00:00 2001 From: nobu Date: Wed, 18 Dec 2002 11:50:49 +0000 Subject: * string.c (rb_str_dup_frozen): handle tail shared string. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@3165 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- string.c | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'string.c') diff --git a/string.c b/string.c index 01316b9c23..26d1cbf2af 100644 --- a/string.c +++ b/string.c @@ -517,8 +517,11 @@ rb_str_dup_frozen(str) VALUE str; { if (FL_TEST(str, ELTS_SHARED)) { - OBJ_FREEZE(RSTRING(str)->aux.shared); - return RSTRING(str)->aux.shared; + VALUE shared = RSTRING(str)->aux.shared; + if (RSTRING(shared)->len == RSTRING(str)->len) { + OBJ_FREEZE(shared); + return shared; + } } if (OBJ_FROZEN(str)) return str; str = rb_str_dup(str); -- cgit v1.2.3