From 8965ed167dbca9471ccc41e9bebe7e2fb1fa9fcb Mon Sep 17 00:00:00 2001
From: nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Thu, 5 Aug 2010 07:42:47 +0000
Subject: * string.c (rb_str_set_len): should fail to modify shared string.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@28865 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 string.c | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'string.c')

diff --git a/string.c b/string.c
index 865de57271..cb371c2662 100644
--- a/string.c
+++ b/string.c
@@ -1694,6 +1694,9 @@ void
 rb_str_set_len(VALUE str, long len)
 {
     str_modifiable(str);
+    if (STR_SHARED_P(str)) {
+	rb_raise(rb_eRuntimeError, "can't set length of shared string");
+    }
     STR_SET_LEN(str, len);
     RSTRING_PTR(str)[len] = '\0';
 }
-- 
cgit v1.2.3