Re: [Add-to-fix] String.c

Hello,

	I commited that. (I dropped these 2:
	
On Fri, Sep 13, 2002 at 09:31:26AM +0900, Yukihiro Matsumoto wrote:
> |@@ -68,11 +68,11 @@ str_new(klass, ptr, len)
> |     RSTRING(str)->ptr = ALLOC_N(char,len+1);
> |     if (ptr) {
> | 	memcpy(RSTRING(str)->ptr, ptr, len);
> |+	RSTRING(str)->ptr[len] = '\0';
> |     }
> |     else {
> |-	MEMZERO(RSTRING(str)->ptr, char, len);
> |+	MEMZERO(RSTRING(str)->ptr, char, len+1);
> |     }
> |-    RSTRING(str)->ptr[len] = '\0';
> |     return str;
> | }
> 
> |@@ -489,10 +491,18 @@ VALUE
> | rb_str_dup_frozen(str)
> |     VALUE str;
> | {
> |+#if 0
> |+    /*
> |+     * Question:
> |+     * What is the str is subseq of share
> |+     * (str->len < str->aux.shared->len)
> |+     * ?
> |+     */
> |     if (FL_TEST(str, ELTS_SHARED)) {
> | 	OBJ_FREEZE(RSTRING(str)->aux.shared);
> | 	return RSTRING(str)->aux.shared;
> |     }
> |+#endif
> |     if (OBJ_FROZEN(str)) return str;
> |     str = rb_str_dup(str);
> |     OBJ_FREEZE(str);

	)

-- 
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Michal Rokos                         Czech Technical University, Prague
e-mail: [e-mail]    icq: 36118339     jabber: [e-mail]
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-