matz	2009-05-24 00:59:09 +0900 (Sun, 24 May 2009)

  New Revision: 23552

  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=rev&revision=23552

  Log:
    * string.c (rb_str_each_char): return original string.
      [ruby-core:23499]
    * string.c (rb_str_each_codepoint): protect string from
      modification.

  Modified files:
    trunk/ChangeLog
    trunk/string.c

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 23551)
+++ ChangeLog	(revision 23552)
@@ -1,3 +1,11 @@
+Sat May 23 23:52:33 2009  Yukihiro Matsumoto  <matz@r...>
+
+	* string.c (rb_str_each_char): return original string.
+	  [ruby-core:23499]
+
+	* string.c (rb_str_each_codepoint): protect string from
+	  modification.
+
 Sat May 23 21:48:58 2009  Nobuyoshi Nakada  <nobu@r...>
 
 	* ext/dl/handle.c (rb_dlhandle_s_sym): added a method to access
Index: string.c
===================================================================
--- string.c	(revision 23551)
+++ string.c	(revision 23552)
@@ -5925,6 +5925,7 @@
 static VALUE
 rb_str_each_char(VALUE str)
 {
+    VALUE orig = str;
     int i, len, n;
     const char *ptr;
     rb_encoding *enc;
@@ -5948,7 +5949,7 @@
 	    rb_yield(rb_str_subseq(str, i, n));
 	}
     }
-    return str;
+    return orig;
 }
 
 /*
@@ -5984,6 +5985,7 @@
 static VALUE
 rb_str_each_codepoint(VALUE str)
 {
+    VALUE orig = str;
     int len, n;
     unsigned int c;
     const char *ptr, *end;
@@ -5991,6 +5993,7 @@
 
     if (single_byte_optimizable(str)) return rb_str_each_byte(str);
     RETURN_ENUMERATOR(str, 0, 0);
+    str = rb_str_new4(str);
     ptr = RSTRING_PTR(str);
     len = RSTRING_LEN(str);
     end = RSTRING_END(str);
@@ -6000,7 +6003,7 @@
 	rb_yield(UINT2NUM(c));
 	ptr += n;
     }
-    return str;
+    return orig;
 }
 
 static long

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/