ruby-list

まつもと ゆきひろです．

In message "[ruby-list:1206] Re: ruby 0.99.3-961204"
    on 96/12/05, sinara@blade.nagaokaut.ac.jp <sinara@blade.nagaokaut.ac.jp> writes:
|
|原です。

|> これはもともとのsuccの定義を変更すべきでしょうね．
|> succって結構面倒なので，rubyで書き直したくないんですよ．せっ
|> かくあるんだから．
|
|あれ？分からないです。「書き直したくないので定義を変更しない」
|のでは？ succ はそのままに upto の定義に succ を使うのをやめた
|らいいんじゃないかと思うんですけど。いまさら無理かな。

まずsuccとuptoは表裏一体なので，動きを合わせたい(jcode.rbで
uptoを書き換えるならsuccも書き換えたい)のが，主な理由です．
さらにuptoはperlのstring increment magicに該当する処理を行っ
ているので，もともとの原さんのuptoでは仕様を満足していません．

|> |後、/./ は "\n" にマッチしないので、jtr の引数には出来ません。
|> |これは仕様ということにしますか。
|> 
|> うーん，考えさせてください．

こいつはできるようになりました．新しいjcode.rbを後ろにつけて
おきます．

|そういえば Perl5 で . を \n にマッチさせる /s オプションという
|のが出来たのでそれを導入したらいかがでしょう。ついでに $* = 1
|に相当する /m オプションというのもあるけれど、、、。

まずrubyはいつも複数行に対応しています．つまりいつでもmオプ
ションを指定していることになりますね．sオプションとかは悩ま
しいですねえ．

正規表現ルーチンは借りもので中身を十分に理解していないので，
あまり改造できないんですよね．本当はperl5の拡張正規表現に対
応させたり，速度を改善したいとは思っているのですけど．

ASCIIだけを考えるならそんなに難しくないと思っているのですが，
日本語の取扱を考えるとちょっと私の能力を越えます．できればど
なたかに助けて頂きたいですね．

|それから、"abc" =~ /abc$/ と "abc\n" =~ /abc$/ は両方真です。
|後者が偽になるオプションもあったらいいかも。

perlのmオプションの逆ですね．

|ついでだ。^^; 要望です。

マッチの情報を配列で返せれば満足できますか？
たとえば

 "a;b;c;" =~ /(.);(.);(.);/
 array = $~.to_a

のような形で．gpickはちょっと違うもののようですけど．

|さらに「反復子」のある正規表現
|
|while( "abc" =~ /./g ) { print $&, "\n" }
|
|に相当する
|
|"abc".each_match(/./) { print $&, "\n" }
|
|もあったらいいなあ。

正規表現のgオプションは純粋に実装上の都合でなかなか難しいの
ですが(スロットに空きがない)，文字単位のマッチイテレータとい
うのはあっても良いと思います．上のgpick相当もこれがあれば簡
単ですし．

で，これは実現するにはString#grepが行単位でなく文字単位でマッ
チすれば良いようにも思いますけど．どうなんでしょう？ もとも
とString#grepを行単位にする必然性はあまりないようですし．

                                まつもと ゆきひろ /:|)

-- jcode.rb
# jcode.rb - ruby code to handle japanese (EUC/SJIS) string

class String
  alias original_succ succ
  private :original_succ

  def succ
    if self[-2] && self[-2] & 0x80 != 0
      s = self.dup
      s[-1] += 1
      return s
    else
      original_succ
    end
  end

  def upto(to)
    return if self > to

    curr = self
    tail = self[-2..-1]
    if tail.length == 2 and tail  =~ /^.$/ then
      if self[0..-2] == to[0..-2]
	for c in self[-1] .. to[-1]
	  yield self[0..-2]+c.chr
	end
      end
    else
      loop do
	yield curr
	return if curr == to
	curr = curr.succ
	return if curr.length > to.length
      end
    end
    return nil
  end

  def _expand_ch
    a = []
    split(/(.-.)|/).each do |r|
      if r =~ /(.)-(.)/
	if $1.length != $2.length
	  next
	elsif $1.length == 1
	  $1[0].upto($2[0]) { |c| a.push c.chr }
	else
	  $1.upto($2) { |c| a.push c }
	end
      elsif r.length > 0
        a.push r
      end
    end
    a
  end

  def tr(from, to)
    afrom = from._expand_ch
    ato = to._expand_ch
    i = 0
    self.split(//).collect{ |c|
      if i = afrom.index(c)
        if i < ato.size then ato[i] else ato[-1] end
      else
        c
      end
    }.join("")
  end

  alias jtr tr        
end

Thread

Prev Next

In This Thread

Prev Next

[#1152] Linux and ext/dbm.c — OZAWA Sakuro <crouton@...>

[#1153] Re: Japanese and tr — Shin-ichiro Hara <sinara@...>

[#1165] dynamic link [HP] — Yasuo OHBA <jammy@...>

[#1167] mistakes in Users' Guide(Oct 23) — Noritugu Nakamura <nnakamur@...>

[#1169] string literal new format — matz@... (Yukihiro Matsumoto)

[#1171] Re: string literal new format — Shin-ichiro Hara <sinara@...>

[#1174] Rational and Complex — keiju@... (Keiju ISHITSUKA)

[#1186] Re: ruby 0.99.3-961203 available — Shin-ichiro Hara <sinara@...>

[#1194] ruby-mode — Yasuo OHBA <jammy@...>

[#1196] ruby 0.99.3-961204 — matz@... (Yukihiro Matsumoto)

[#1208] Re: ruby 0.99.3-961204 — Shin-ichiro Hara <sinara@...>

[#1209] [Q] Scope of local variable — Shin-ichiro Hara <sinara@...>

[#1219] ruby animal — OZAWA Sakuro <crouton@...>

[#1231] Re: [BUG} delete (Re: ruby 0.99.3-961204) — Shin-ichiro Hara <sinara@...>

[#1243] Re: ruby 0.99.3-961204 — Shin-ichiro Hara <sinara@...>

[#1244] ruby 0.99.3-961210 available — matz@... (Yukihiro Matsumoto)

[#1248] ruby NutShell book — Kimijima Hideyuki <sanjigen@...>

[#1252] [Q] Escape of meta-char(Re: ruby 0.99.3-961210 available) — Shin-ichiro Hara <sinara@...>

[#1256] ruby 0.99.4-961212 available — matz@... (Yukihiro Matsumoto)

[#1270] thread and $1 — keiju@... (Keiju ISHITSUKA)

[#1280] Request for inspect — keiju@... (Keiju ISHITSUKA)

[#1285] (no subject in original) —

[#1288] None — (Dezawa Shin-ichiro) <dezawa@...>

[#1290] ruby 0.99.4-961217 will be available — matz@... (Yukihiro Matsumoto)

[#1293] MIX Offline Meeting — Shin-ichiro Hara <sinara@...>

[#1297] Re: MIX Offline Meeting — Shin-ichiro Hara <sinara@...>

[#1312] djgpp v2 and fpu — Noritugu Nakamura <nnakamur@...>

[#1313] Re: Rational and Complex — Shin-ichiro Hara <sinara@...>

[#1316] method nothing — keiju@... (Keiju ISHITSUKA)

[#1330] Re: Rational and Complex — Shin-ichiro Hara <sinara@...>

[#1361] [Dist] distributed ruby — keiju@... (Keiju ISHITSUKA)

[#1368] 代入の値 — (Dezawa Shin-ichiro) <dezawa@...>

[#1377] lock, unlock — WATANABE Hirofumi <watanabe@...>

[#1386] ruby 0.99.4-961219 available — matz@... (Yukihiro Matsumoto)

[#1393] new の override — (Dezawa Shin-ichiro) <dezawa@...>

[#1394] 同じメソッドで、引数が違う やつ — (Dezawa Shin-ichiro) <dezawa@...>

[#1395] None — (Dezawa Shin-ichiro) <dezawa@...>

[#1399] Ruby Glossary — matz@... (Yukihiro Matsumoto)

[#1404] Re: new の override — Sinichiro Dezawa <dezawa@...>

[#1418] Re: Ruby Glossary — Shin-ichiro Hara <sinara@...>

[#1420] Can't run Ruby (DJGPP) on PC-DOS — s.suda@...

[#1423] 配列への grep — (Dezawa Shin-ichiro) <dezawa@...>

[#1424] String.succ — (Dezawa Shin-ichiro) <dezawa@...>

[#1439] Re: Ruby Glossary — Shin-ichiro Hara <sinara@...>

[#1440] Re: Ruby Glossary — Shin-ichiro Hara <sinara@...>

[#1443] Ruby/AIX — s.suda@...

[#1449] diff -c C++ ruby — Sinichiro Dezawa <dezawa@...>

[#1453] About Win32 & DJGPP Package — Shin-ichiro Hara <sinara@...>

[#1454] Re: サブクラスの作成 再び — Shin-ichiro Hara <sinara@...>

[#1460] ruby 0.99.4-961224 available — matz@... (Yukihiro Matsumoto)

[#1462] wait child process — Itsuro Saito <saito@...>

[#1464] Re: wait child process — Shin-ichiro Hara <sinara@...>

[#1469] wish ... — Noritugu Nakamura <nnakamur@...>

[#1474] Ruby for AIX! — LH5S-SD@...

[#1481] 例外 — Sinichiro Dezawa <dezawa@...>

[#1484] Re: [ruby-list:1481] 例外 — Shin-ichiro Hara <sinara@...>

[#1486] Ruby.exe Error? — s.suda@...

[#1488] ruby 1.0 released finally!! — matz@... (Yukihiro Matsumoto)

[#1492] Re: Ruby.exe Error? —

[#1500] matz's vacation — matz@... (Yukihiro Matsumoto)

[#1505] djgpp ruby 1.0 —

[#1508] 型変換 — (Dezawa Shin-ichiro) <dezawa@...>

[#1509] C++ユーザのための手引 (Ver. 0.1.1) — (Dezawa Shin-ichiro) <dezawa@...>

[#1510] Congraturation! (Re:ruby 1.0 released finally!!) — Shin-ichiro Hara <sinara@...>

[#1511] Congratulation!!(Re: Congraturation!) — Shin-ichiro Hara <sinara@...>

[#1512] Re: ruby 1.0 on IRIX (Re: wish ...) —

[#1517] [Ruby/Tk] place ? — Noritugu Nakamura <nnakamur@...>

[#1518] dynamic endian check for nextstep — matz@... (Yukihiro Matsumoto)

[#1519] Re: ruby 1.0 on IRIX (Re: wish ...) —

[#1523] konnnichiha — Shirakata Takashi <sirakata@...>

[#1530] Hash の 加算 — (Dezawa Shin-ichiro) <dezawa@...>

[#1531] new — "Furutani Shun-ichi" <sf@...>

[#1532] Re: 例外 — Shin-ichiro Hara <sinara@...>

[#1533] Re: C++ ユーザのための手引 (Ver. 0.1.1) — Shin-ichiro Hara <sinara@...>

[#1537] Re: C++ ユーザのための手引 (Ver. 0.1.1) — Shin-ichiro Hara <sinara@...>

[#1547] Re: rbdj1227.lzh (ruby 1.0) —

[#1554] Re: rbdj1227.lzh (ruby 1.0) — Shin-ichiro Hara <sinara@...>

[ruby-list:1207] Re: ruby 0.99.3-961204

Thread

In This Thread

[#1394] 同じメソッドで、引数が違うやつ — (Dezawa Shin-ichiro) <dezawa@...>

[#1454] Re: サブクラスの作成再び — Shin-ichiro Hara <sinara@...>

[#1530] Hash の加算 — (Dezawa Shin-ichiro) <dezawa@...>