[ruby-dev:12781] Re: String#scan

なかだです。

At Thu, 5 Apr 2001 16:04:04 +0900,
IWAMURO Motonori <[e-mail]> wrote:
> # 逆にRegexpにはString#scanに相当するメソッドはないようですね(また見落
> # としてるかもしれませんが)。
> #   String#sub ⇔ String#gsub
> # のような関係は
> #   Regexp#match ⇔ String#scan
> # と考えればいいのかな。(ちょっと対称性が今一つですが^^;)

  String#index で位置を指定しながらループすると似た感じになりま
すが、Regexp のメソッドだとできませんね。つことで Regexp#match
にも位置指定の引数を追加してみるとか。

# あれ、こういうの前に出てましたっけ?


Index: re.c
===================================================================
RCS file: /cvs/ruby/src/ruby/re.c,v
retrieving revision 1.40
diff -u -2 -p -r1.40 re.c
--- re.c	2001/02/08 09:19:17	1.40
+++ re.c	2001/04/05 10:50:29
@@ -963,10 +963,21 @@ rb_reg_match2(re)
 
 static VALUE
-rb_reg_match_m(re, str)
-    VALUE re, str;
+rb_reg_match_m(argc, argv, re)
+    int argc;
+    VALUE *argv;
+    VALUE re;
 {
-    VALUE result = rb_reg_match(re, str);
+    VALUE str, initpos, result;
+    long pos;
 
-    if (NIL_P(result)) return Qnil;
+    if (rb_scan_args(argc, argv, "11", &str, &initpos) == 2) {
+	pos = NUM2LONG(initpos);
+    }
+    else {
+	pos = 0;
+    }
+    if (NIL_P(str)) return Qnil;
+    str = rb_str_to_str(str);
+    if (rb_reg_search(re, str, pos, 0) < 0) return Qnil;
     result = rb_backref_get();
     rb_match_busy(result);
@@ -1383,5 +1394,5 @@ Init_Regexp()
     rb_define_method(rb_cRegexp, "===", rb_reg_match, 1);
     rb_define_method(rb_cRegexp, "~", rb_reg_match2, 0);
-    rb_define_method(rb_cRegexp, "match", rb_reg_match_m, 1);
+    rb_define_method(rb_cRegexp, "match", rb_reg_match_m, -1);
     rb_define_method(rb_cRegexp, "inspect", rb_reg_inspect, 0);
     rb_define_method(rb_cRegexp, "source", rb_reg_source, 0);


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