[ruby-dev:13112] test failed

なかだです。

  1.7.0 2001/05/02 が make test で SEGV します。rb_ary_update()
で rpl == RARRAY(ary)->ptr のときに、先に REALLOC_N() されてし
まってゴミがコピーされるようです。

  それともう一つ、NameError -> NoMethodError の変更がテストに反
映されてません。


Index: array.c
===================================================================
RCS file: /cvs/ruby/src/ruby/array.c,v
retrieving revision 1.46
diff -u -2 -p -r1.46 array.c
--- array.c	2001/05/02 04:22:10	1.46
+++ array.c	2001/05/06 13:49:33
@@ -598,13 +598,13 @@ rb_ary_replace(ary, beg, len, rpl)
     long beg, len;
 {
-    long rlen;
-
     if (NIL_P(rpl)) {
-	rpl = rb_ary_new2(0);
+	rb_ary_update(ary, beg, len, NULL, 0);
     }
     else if (TYPE(rpl) != T_ARRAY) {
-	rpl = rb_ary_new3(1, rpl);
+	rb_ary_update(ary, beg, len, &rpl, 1);
+    }
+    else if (ary != rpl || (beg && len != RARRAY(rpl)->len)) {
+	rb_ary_update(ary, beg, len, RARRAY(rpl)->ptr, RARRAY(rpl)->len);
     }
-    rb_ary_update(ary, beg, len, RARRAY(rpl)->ptr, RARRAY(rpl)->len);
 }
 
@@ -1204,5 +1204,7 @@ rb_ary_replace_m(ary, ary2)
 {
     ary2 = to_ary(ary2);
-    rb_ary_replace(ary, 0, RARRAY(ary)->len, ary2);
+    if (ary != ary2) {
+	rb_ary_replace(ary, 0, RARRAY(ary)->len, ary2);
+    }
     return ary;
 }
Index: sample/test.rb
===================================================================
RCS file: /cvs/ruby/src/ruby/sample/test.rb,v
retrieving revision 1.19
diff -u -2 -p -r1.19 test.rb
--- sample/test.rb	2000/12/28 05:00:47	1.19
+++ sample/test.rb	2001/05/06 11:29:15
@@ -1054,5 +1054,5 @@ begin
   foo.test2
   test_ok false
-rescue NameError
+rescue NoMethodError
   test_ok true
 end


-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦