aset

ちょっと教えて下さい。 (let ((string "あい")) (aset string 0 ?ア) string) この式が文字列 "アい" を返すことを期待するのは間違っていないと思うので すが、最近の XEmacs 21.2 では第一文字目が "ア" ではなくて (int-to-char (logand 255 (char-to-int ?ア))) に相当する文字 (下位 8-bit を切り出したもの) になってしまいます。 これはやはりバグなんでしょうか? 実はかなり前から egg-sj3 の変換候補に現れるべき、単にひらがなをカタカ ナに変換しただけのものが文字化けすることに気が付いていたのですが、この 原因が egg-sj3-client.el の関数 `sj3-put-kata' にあることがやっとわか りました。 例えば以下のように aset を使わないように改造してしまえば解決するのです が、それは筋違いなのではないかと思いまして質問いたしました。 (defun sj3-put-kata (str) (insert (japanese-katakana str) 0)) -- Katsumi Yamaoka <yamaoka(a)jpl.org&gt;