2006年10月30日

[Namazu-devel-ja 1350] Re: mknmz の処理時間短縮

臼田です

On 2006/10/30, at 8:18, Tadamasa Teranishi wrote:

>
>> もう少し速くなりそうな改良案を作成してみました。
>>
>> sub hash ($) {

>> my ($word) = @_;
>>
>> my $hash = 0;
>> my $i = 0;
>> $word = reverse($word);
>> while(length($word)) {
>> $hash ^= $Seed[$i & 0x03][ord(chop($word))];
>> $i++;
>> }
>> return $hash & 65535;
>> }
>
> 手元の環境では遅くなるようです。
> $word が長いと reverse に時間がかかるからでしょう。

$word が長い方が chop に変えた効果が出るよう
なのですが環境によって違う結果が出るのですね。

寺西さんの改良案の方が動作の意図が
分かりやすいのでよいかと思います。

臼田幸生

_______________________________________________
Namazu-devel-ja mailing list
Namazu-devel-ja@xxxxx
http://www.namazu.org/cgi-bin/mailman/listinfo/namazu-devel-ja

投稿者 xml-rpc : 2006年10月30日 23:44
役に立ちました?:
過去のフィードバック 平均:(0) 総合:(0) 投票回数:(0)
本記事へのTrackback: http://hoop.euqset.org/blog/mt-tb2006.cgi/48543
トラックバック
コメント
コメントする




画像の中に見える文字を入力してください。