ruby-dev

こんにちは。

思うところあって ruby_m17n を見てたんですが、
String#<=> のバグを見つけました。
# で、今日初めて ruby-dev@ruby-lang.org に登録しました。(^^;

例えば、SJIS で大小文字を無視した比較を行うと
'帰' == '蟻' が真になります。

    #!/home/user/bin/ruby_m17n -Ks
    $= = true
    p '帰' == '蟻' # => true

一応私なりに直してみて、期待通り動いてます。
# 仕様を把握していないので仕様が間違ってるかも…


----
馬越

Attachments (1)

ruby_m17n.patch (708 Bytes, text/x-diff)

--- m17n.c.orig	Mon Mar  5 12:37:34 2001
+++ m17n.c	Sun Sep  2 12:21:46 2001
@@ -715,11 +715,22 @@
     const m17n_encoding *enc;
 {
     int tmp;
+    int clen;
 
-    while (len--) {
-	if (tmp = m17n_toupper(enc, (unsigned)*p1++) -
-	          m17n_toupper(enc, (unsigned)*p2++))
-	    return tmp;
+    while (len > 0) {
+	clen = m17n_mbclen(enc, *p1);
+	if (clen != m17n_mbclen(enc, *p2))
+	    return ((unsigned)*p1 - (unsigned)*p2);
+	len -= clen;
+	if (clen == 1) {
+	    if (tmp = m17n_toupper(enc, (unsigned)*p1++) -
+		      m17n_toupper(enc, (unsigned)*p2++))
+		return tmp;
+	}
+	else {
+	    while (clen--)
+		if (tmp = (unsigned)*p1++ - (unsigned)*p2++) return tmp;
+	}
     }
     return 0;
 }

Thread

Prev Next

In This Thread

Prev Next

[#14614] 大小文字を無視した比較で ' 帰 ' == ' 蟻 ' ? — "K.Umakoshi" <pegacorn@...>

[#14621] suidruby — nobu.nakada@...

[#14626] ARGV — WATANABE Hirofumi <eban@...>

[#14636] Re: [REQ] String#slice(re, n) — Minero Aoki <aamine@...>

[#14642] getnameinfo? — Masatoshi SEKI <m_seki@...>

[#14658] Socekt::SOL_TCP -> Socket::IPPROTO_TCP — m_seki@...

[#14662] How to abondon saved uid privilege — nobu.nakada@...

[#14668] = in conditional — "Akinori MUSHA" <knu@...>

[#14683] ruby 1.7 の eval.c で warning — Kazuhiro NISHIYAMA <zn@...>

[#14697] Forward: [ruby-talk:20735] bug in tk.rb? — matz@... (Yukihiro Matsumoto)

[#14698] Forward: [ruby-talk:20820] Ruby/Tk core dump — matz@... (Yukihiro Matsumoto)

[#14710] SEGV at digest.c — Tietew <tietew@...>

[#14712] extra puts() at digest.c — Tietew <tietew@...>

[#14716] CGI#header bug — Shugo Maeda <shugo@...>

[#14730] ruby-lex.rb: get value from TkSTRING and TkCOMMENT — TAKAHASHI Masayoshi <maki@...>

[#14741] Forward: [ruby-talk:20957] Re: Is Ruby/Tk being maintained? — matz@... (Yukihiro Matsumoto)

[#14742] Forward: [ruby-talk:20964] Re: Is Ruby/Tk being maintained? — matz@... (Yukihiro Matsumoto)

[#14743] [BUG] $_ on thread switching — nobu.nakada@...

[#14749] forwardable.rb : call Kernel.raise — Kenichi Komiya <kom@...1.accsnet.ne.jp>

[#14754] regex.c について — Osamu Shigematsu <shige@...>

[#14765] DISTCLEANFILES in mkmf.rb — nobu.nakada@...

[#14766] Enumerable#inject — OZAWA -Crouton- Sakuro <crouton@...>

[#14768] rational precision 対応 — keiju@... (Keiju ISHITSUKA)

[#14782] coredump in mod_ruby's configure.rb — "Akinori MUSHA" <knu@...>

[#14786] [PATCH] File.utime fails occasionally — nobu.nakada@...

[#14793] Array is not Comparable — "Akinori MUSHA" <knu@...>

[#14798] freeing thread stack etc. (Re: ruby 1.6.5 preview) — matz@... (Yukihiro Matsumoto)

[#14809] WAIT_SELECT value with multithread — nobu.nakada@...

[#14810] ruby1.6.5/marshal.c — "Shin'ya Adzumi" <adzumi@...>

[#14813] option -d differ with --debug — Koji Arai <JCA02266@...>

[#14816] Generator — "Akinori MUSHA" <knu@...>

[#14823] ruby-1.6.5 MacOS X 10.1 patch — SHIROYAMA Takayuki - <psi@...>

[#14824] mailread.rb — Tietew <tietew@...>

[ruby-dev:14614] 大小文字を無視した比較で ' 帰 ' == ' 蟻 ' ?

Attachments (1)

Thread

In This Thread

[#14823] ruby-1.6.5 MacOS X 10.1 patch — SHIROYAMA Takayuki　- <psi@...>