ruby-list

はじめまして．永井＠知能．九工大と申します．

ruby の勉強を始めて 10 日程度の初心者です．
jcode.rb に関連して二点ほど質問があります．

一点目は mbchar? についてですが，
これはなぜこのような仕様になっているのでしょうか．
現在の仕様ではある s という String に 2byte 文字が含まれているかを
確認したい場合，メソッド mbchar?(s) を何らかの String オブジェクトに
渡してやる必要があるように見えます．
この受け手のオブジェクトは mbchar? には何の関係もないものですから，
どうにも不自然に感じます．
s.mbchar? とする方が自然に感じるのですが．．．
ML の過去ログは量が多すぎて調べていません．
＃ すみません (_O_)
もし何らかの議論の末，このような仕様となっているのでしたら，
そのポインタを教えていただけると幸いです．

二点目は squeeze というか，gsub に関することです．
jcode.rb での squeeze の再定義では，

   self.gsub!(/(.|\n)\1+/, '\1')

という処理が行われていますが，これが期待するように動いていないようです．
ruby-1.1b9 を Linux (kernel2.0.33, libc.so.5.4.38), gcc-2.7.2.3 の環境です．
たとえば，"aaaaabbbbccc".gsub(/(.|\n)\1+/, '\1')
は "aaabbccd" となりますし，
"aaaaabbbbccc".gsub(/(.|\n)(\1)+/, '\1')
としても "aaabbccd" となります．
"aaaaabbbbccc".gsub(/(.|\n)\1\1*/, '\1')
の場合も "aaabbccd" となります．
"aaaaabbbbccc".gsub(/(.|\n)(?:\1)+/, '\1')
とした場合に，ようやく "abcd" となります．
どうも参照と + や * の組が期待通りではないように見えます．

以上の二点のため，とりあえず以下のようにパッチをあてて使っています．
------------------------------------------------------------
--- jcode.rb.orig	Thu Mar 26 13:06:52 1998
+++ jcode.rb	Thu Mar 26 13:07:01 1998
@@ -11,11 +11,11 @@
   alias original_succ succ
   private :original_succ
 
-  def mbchar?(c)
+  def mbchar?
     if $KCODE =~ /^s/i
-      c =~ /[\x81-\x9f\xe0-\xef][\x40-\x7e\x80-\xfc]/n
+      self =~ /[\x81-\x9f\xe0-\xef][\x40-\x7e\x80-\xfc]/n
     elsif $KCODE =~ /^e/i
-      c =~ /[\xa1-\xfe][\xa1-\xfe]/n
+      self =~ /[\xa1-\xfe][\xa1-\xfe]/n
     else
       FALSE
     end
@@ -25,7 +25,7 @@
     if self[-2] && self[-2] & 0x80 != 0
       s = self.dup
       s[-1] += 1
-      s[-1] += 1 if !mbchar?(s)
+      s[-1] += 1 if !s.mbchar?
       return s
     else
       original_succ
@@ -41,7 +41,7 @@
       if self[0..-2] == to[0..-2]
 	first = self[-2].chr
 	for c in self[-1] .. to[-1]
-	  if mbchar?(first+c.chr)
+	  if first+c.chr.mbchar?
 	    yield self[0..-2]+c.chr
 	  end
 	end
@@ -137,7 +137,7 @@
       end
       adel = del._expand_ch
       if comp
-	self.gsub!(/(.|\n)\1+/) do
+	self.gsub!(/(.|\n)(?:\1)+/) do
 	  next unless adel.include?($1)
 	  $&
 	end
@@ -149,7 +149,7 @@
       end
       self
     else
-      self.gsub!(/(.|\n)\1+/, '\1')
+      self.gsub!(/(.|\n)(?:\1)+/, '\1')
     end
   end
 
------------------------------------------------------------

-- 
                                         永井 秀利 （九工大 知能情報）
                                             nagai@ai.kyutech.ac.jp

Thread

Prev Next

In This Thread

Prev Next

[#6858] monitor.rb and ftplib.rb — shugo@... (Shugo Maeda)

[#6859] register calc (call for scripts) — TEI meiki <tei@...>

[#6860] inspect (mb string) — 青山 和光 <PXN11625@...>

[#6861] Re: http_get.rb — 青山 和光 <PXN11625@...>

[#6862] Re: http_get.rb — 青山 和光 <PXN11625@...>

[#6863] Re: http_get.rb — 青山 和光 <PXN11625@...>

[#6889] lib/date.rb — Tadayoshi Funaba <tadf@...>

[#6890] date class — Tadayoshi Funaba <tadf@...>

[#6893] Re: http_get.rb — 青山 和光 <PXN11625@...>

[#6905] Email your AD to 57 MILLION People ONLY $99 — 29818412@...

[#6906] ruby's Icon ? — 藤本尚邦 / FUJIMOTO Hisakuni <hisa@...>

[#6915] Re: inspect (mb string) — 青山 和光 <PXN11625@...>

[#6916] Re: http_get.rb — 青山 和光 <PXN11625@...>

[#6917] Re: inspect (mb string) — 青山 和光 <PXN11625@...>

[#6918] manual 1.18b index — WATANABE Tetsuya <tetsu@...>

[#6920] Re: call for scripts — sakamoto@... (Sadayuki Sakamoto)

[#6929] Expect lib for ruby — nosuzuki@... (Norio Suzuki)

[#6938] Re: ruby's Icon ? — 助田 雅紀 <masaki.suketa@...>

[#6954] Re: ruby's Icon ? — nosuzuki@... (Norio Suzuki)

[#6956] Re: ruby's Icon ? — takehiro.kubo@... (KUBO Takehiro)

[#6958] Re: inspect (mb string) — 青山 和光 <PXN11625@...>

[#6968] Re: ruby's Icon ? — 助田 雅紀 <masaki.suketa@...>

[#6975] Re: coerce — toyofuku@...

[#6978] win32 版 ruby の getc について — ARIMA Yasuhiro <fit0298@...>

[#6983] ext POSIX.setsid — WATANABE Tetsuya <tetsu@...>

[#6999] RE: [ruby-list:6994] Re: Curses and Slang Module (was Re: win32版ruby の getc について) — 助田 雅紀 <masaki.suketa@...>

[#7003] Ruby for MacOS, BeOS — 藤本尚邦 / FUJIMOTO Hisakuni <hisa@...>

[#7004] gtk 0.99.4 and gtk module — Noritsugu Nakamura <nnakamur@...>

[#7008] builtin class inherit — TEI meiki <tei@...>

[#7009] netscape remote script — Noritsugu Nakamura <nnakamur@...>

[#7013] modulo — toyofuku@...

[#7021] unary +/- — Tadayoshi Funaba <tadf@...>

[#7022] スレッドの終了待ち — densuke@...2.so-net.or.jp

[#7023] infinity — Tadayoshi Funaba <tadf@...>

[#7035] Re: modulo — toyofuku@...

[#7067] rfc822.rb — akira yamada / やまだあきら <akira@...>

[#7083] about rbc — Kazuhisa YANAGAWA <katze@...>

[#7094] Re: ruby-beginners — matz@... (Yukihiro Matsumoto)

[#7097] bltlib module — Noritsugu Nakamura <nnakamur@...>

[#7098] rbc and readline — keiju@... (Keiju ISHITSUKA)

[#7105] postgres-6.3 and postgres-module — Eiji-usagi-MATSUmoto <ematsu@...>

[#7107] calender-html.rb (Re: call for scripts) — Shin-ichiro HARA <sinara@...>

[#7111] How to simulate Perl's DATA file handle — OZAWA Sakuro <crouton@...>

[#7118] Re: rfc822.rb — 青山 和光 <PXN11625@...>

[#7119] Re: inspect (mb string) — 青山 和光 <PXN11625@...>

[#7120] Re: Ruby for MacOS, BeOS — 青山 和光 <PXN11625@...>

[#7121] simple_chat_server.rb — 青山 和光 <PXN11625@...>

[#7125] Re: CGI#include? — 青山 和光 <PXN11625@...>

[#7126] do end or {} — Eiji-usagi-MATSUmoto <ematsu@...>

[#7128] fixed man pages — Kazuhisa YANAGAWA <katze@...>

[#7145] gsub — WATANABE Tetsuya <tetsu@...>

[#7147] each_char — TEI meiki <tei@...>

[#7153] please apply me — SHUDOH Kazuyuki <shudoh@...>

[#7155] undefined class switch — keiju@... (Keiju ISHITSUKA)

[#7160] [Bug] 10e0.9 — keiju@... (Keiju ISHITSUKA)

[#7166] bit — matz@... (Yukihiro Matsumoto)

[#7173] ASCII 98/4 — WATANABE Tetsuya <tetsu@...>

[#7174] join in — takas-su@... (Takashi Sugimura)

[#7175] Re: CGI#include? — 青山 和光 <PXN11625@...>

[#7177] Re: [ruby-dev:1845] [ANNOUNCE] grepsvr.rb — Shin-ichiro HARA <sinara@...>

[#7180] chomp! — Kazunori NISHI <kazunori@...>

[#7183] Numeric — toyofuku@...

[#7186] Re: Numeric — toyofuku@...

[#7192] I hope join. — Takashi Shimizu <simtak@...>

[#7200] delegation of TCPsocket — TAKEUCHI Kahori (竹内かほり) <take-k@...>

[#7208] for in bsh — matz@... (Yukihiro Matsumoto)

[#7221] test — matz@... (Yukihiro Matsumoto)

[#7222] jcode.rb — NAGAI Hidetoshi <nagai@...>

[#7229] Re: call for scripts — Yasunari Momoi <conan@...>

[#7232] final.rb error? — tateishi@...

[#7234] final.rb error? 2 — tateishi@...

[#7238] Forward: 自己再生プログラム — matz@... (Yukihiro Matsumoto)

[#7244] [Q] test file1 -nt file2 — matz@... (Yukihiro Matsumoto)

[#7253] tk version — gotoken@... (GOTO Kentaro)

[#7257] TkScale.new(parent){to -0.1} — gotoken@... (GOTO Kentaro)

[#7259] Socket#shutdown — keiju@... (Keiju ISHITSUKA)

[#7261] — Sinichiro Dezawa <dezawa@...>

[#7282] ruby ftp mirror to my disk — Noritsugu Nakamura <nnakamur@...>

[#7284] base64.rb — jkuro@... (Kuroda Jun)

[#7285] Re: modulo — Toyofuku <toyofuku@...>

[#6860] inspect (mb string) — 青山　和光 <PXN11625@...>

[#6861] Re: http_get.rb — 青山　和光 <PXN11625@...>

[#6862] Re: http_get.rb — 青山　和光 <PXN11625@...>

[#6863] Re: http_get.rb — 青山　和光 <PXN11625@...>

[#6893] Re: http_get.rb — 青山　和光 <PXN11625@...>

[#6915] Re: inspect (mb string) — 青山　和光 <PXN11625@...>

[#6916] Re: http_get.rb — 青山　和光 <PXN11625@...>

[#6917] Re: inspect (mb string) — 青山　和光 <PXN11625@...>

[#6938] Re: ruby's Icon ? — 助田　雅紀 <masaki.suketa@...>

[#6958] Re: inspect (mb string) — 青山　和光 <PXN11625@...>

[#6968] Re: ruby's Icon ? — 助田　雅紀 <masaki.suketa@...>

[#6999] RE: [ruby-list:6994] Re: Curses and Slang Module (was Re: win32版ruby の getc について) — 助田　雅紀 <masaki.suketa@...>

[#7118] Re: rfc822.rb — 青山　和光 <PXN11625@...>

[#7119] Re: inspect (mb string) — 青山　和光 <PXN11625@...>

[#7120] Re: Ruby for MacOS, BeOS — 青山　和光 <PXN11625@...>

[#7121] simple_chat_server.rb — 青山　和光 <PXN11625@...>

[#7125] Re: CGI#include? — 青山　和光 <PXN11625@...>

[#7175] Re: CGI#include? — 青山　和光 <PXN11625@...>