* node.h (NODE_ATTRASGN): new node, assignment to attribute.

  [ruby-core:00637].

* eval.c (is_defined, rb_eval): ditto.

* parse.y (attrset, node_assign): ditto.

* string.c (rb_str_substr): tail sharing.  [ruby-core:00650]


git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@3160 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 12 insertions, 2 deletions

diff --git a/string.c b/string.c
index 754db3005..5ca6aae4d 100644
--- a/string.c
+++ b/string.c
@@ -474,8 +474,18 @@ rb_str_substr(str, beg, len)
     }
     if (len == 0) return rb_str_new5(str,0,0);
 
-    str2 = rb_str_new5(str,RSTRING(str)->ptr+beg, len);
-    OBJ_INFECT(str2, str);
+    if (len > sizeof(struct RString)/2 &&
+	beg + len == RSTRING(str)->len &&
+	!FL_TEST(str, STR_ASSOC)) {
+	if (!FL_TEST(str, ELTS_SHARED)) str = rb_str_new4(str);
+	str2 = rb_str_new3(str);
+	RSTRING(str2)->ptr += beg;
+	RSTRING(str2)->len = len;
+    }
+    else {
+	str2 = rb_str_new5(str, RSTRING(str)->ptr+beg, len);
+	OBJ_INFECT(str2, str);
+    }
 
     return str2;
 }