[ruby-dev:575] Re: optimize (Re: Assigne to special variable)

えぐち です

----------
> 差出人 : Yukihiro Matsumoto <[e-mail]>
> 件名 : [ruby-dev:567] Re: optimize (Re: Assigne to special variable)
> 
> まつもと ゆきひろです
> 
> In message "[ruby-dev:556] Re: optimize (Re: Assigne to special
variable)"
>     on 97/09/27, "EGUCHI Osamu" <[e-mail]> writes:
> 
> |えぐち です。
> 
> |bigXXX() が概ね１０〜２０％スピードアップでした。 
> 
> それでも大したものですよね．早速取り込みます．

まがさすして（爆）つくってスピードアップパッチが少しあるので
近々 put します。

内容は、パーサのキーワード判定の完全ハッシュ関数化です。

ファイルが１つ増えますが ruby のソースファイルは 8.3 な
ファイル名でないとだめですか？ （ruby-parse.gperf は違反？）

> |正式にテストベクタを作って make test での項目に追加したいです。
> 
> こちらも楽しみにしています．

どうも、何を検査しているのかわからないコードになってしまいました。
＃ゼロ除の捕捉の確認部分ももまだかいてないなぁ
＃そもそも比較の検証を最初にやらないと意味無さそうだし、、
testsuite を書くのは処理系そのものを書くより困難かもしれません ^^;

一応書きかけですが、添付します。（ベンチマークにはなるかもしれない）

for i in 1000..3000
  p "FAIL 1" if ((1<<i) != (2**i))
end

n1=1
for i in 0..3000
  p "FAIL 2" if ((1<<i) != n1)
  n1 *= 2
end

n2=n1
for i in 3000..-1
  n1 = n1 / 2
  n2 = n2 >> 1
  p "FAIL 2" if (n1 != n2)
end

for i in 1000..4000
  n = 1 << i;
  p "FAIL 3" if ((n**2-1) != ((n+1)*(n-1)))
end

for i in 1000..4000
  n = 1 << i;
  p "FAIL 4" if ((n1**2-1) / (n1+1) != (n1-1))
end