[Mew-dist 15431] Re: incremental search in summary mode
SAKAI Kiyotaka
ksakai at example.com
2000年 12月 13日 (水) 12:26:32 JST
>> In article <20001213.104851.68540460.shirai at example.com>, Hideyuki SHIRAI (白井秀行) <shirai at example.com> writes:
> ## どれぐらい時間がかかるか実験していたところでした。その結果に
> ## よっては反対しようかなと思って。^^;;;
> 試しに、19000通ほどメールをため込んでいる folder で
> (while (re-search-forward "\\(\r.*\\)$" nil t)
> (put-text-property (match-beginning 1) (match-end 1) 'invisible t)))
> なことをやって時間を計ったところ、大体 2秒かかりました。
> ただし、実験に使ったマシンが、SUN UA-80 フル回転なので、遅めの
> CPU だと辛いかも。
試しに 30,000 通ほどのキャシュファイル (ファイルサイズは約5MByte) を作
成して SS20 (SunOS 4.1.4) で実験してみたところ、20秒ほどかかりました。
ただし、正規表現を
(while (re-search-forward "\r.*\n" nil t)
(put-text-property (match-beginning 0) (1- (match-end 0)) 'invisible t))
と簡潔にしたところ、所要時間は 15秒まで減りました。
なお、5MByte のファイルを find-file するのに要する時間は 10秒でした。
さすがにこれほど多くのメールを溜め込むことはないでしょうし、時間がかか
るのも最初に mew-summary-goto-folder を実行したときだけですので、許さ
れるのではないかという気もするのですが、確かに微妙なところではあります
ね。
>> In article <20001213.110603.85341687.kazu at example.com>, Kazu Yamamoto (山本和彦) <kazu at example.com> writes:
> - mode line はあきらめて
個人的には、あきらめたくないです。
--
酒井 清隆 (E-mail: ksakai at example.com)
Mew-dist メーリングリストの案内