[ruby-dev:27269] Re: fail on test/rss

なかだです。

At Wed, 21 Sep 2005 02:11:44 +0900,
Yukihiro Matsumoto wrote in [ruby-dev:27240]:
> |to_aryは使わずにto_aだけ、ということでしょうか。それとも以前の
> |ようにto_aryがなければto_aを使う?
> 
> 最初からto_aだけです。nil.to_aはなくさなくてもいいかもしれま
> せん。

rb_Array()でも同じことをしてるんで、rb_check_array_type()みたい
に関数にしようかとも思いましたが、名前を思いつきません。
# rb_check_array_convertible()?

re.cのto_regexpもまとめといてもいいかも。


Index: eval.c
===================================================================
RCS file: /cvs/ruby/src/ruby/eval.c,v
retrieving revision 1.832
diff -U2 -p -u -r1.832 eval.c
--- eval.c	20 Sep 2005 09:26:03 -0000	1.832
+++ eval.c	21 Sep 2005 08:53:14 -0000
@@ -2645,5 +2645,5 @@ static VALUE
 splat_value(VALUE v)
 {
-    VALUE tmp = rb_check_array_type(v);
+    VALUE tmp = rb_check_convert_type(v, T_ARRAY, "Array", "to_a");
 
     if (NIL_P(tmp)) v = rb_ary_new3(1, v);
Index: re.c
===================================================================
RCS file: /cvs/ruby/src/ruby/re.c,v
retrieving revision 1.142
diff -U2 -p -u -r1.142 re.c
--- re.c	12 Sep 2005 10:44:20 -0000	1.142
+++ re.c	21 Sep 2005 09:06:07 -0000
@@ -1872,4 +1872,9 @@ rb_reg_options(VALUE re)
 }
 
+static VALUE
+to_regexp(VALUE val)
+{
+    return rb_check_convert_type(val, T_REGEXP, "Regexp", "to_regexp");
+}
 
 /*
@@ -1897,5 +1902,5 @@ rb_reg_s_union(int argc, VALUE *argv)
     else if (argc == 1) {
         VALUE v;
-        v = rb_check_convert_type(argv[0], T_REGEXP, "Regexp", "to_regexp");
+        v = to_regexp(argv[0]);
         if (!NIL_P(v))
             return v;
@@ -1915,5 +1920,5 @@ rb_reg_s_union(int argc, VALUE *argv)
             if (0 < i)
                 rb_str_buf_cat2(source, "|");
-            v = rb_check_convert_type(argv[i], T_REGEXP, "Regexp", "to_regexp");
+            v = to_regexp(argv[i]);
             if (!NIL_P(v)) {
                 if (FL_TEST(v, KCODE_FIXED)) {


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