フィボナッチベンチの結果

投稿日: Mar 14, 2009 1:50:6 PM

R4.1 のフィボナッチベンチの結果は極めて良好です。

下記のソースで、

Integer>>fib

    self < 2 ifTrue: [^ self].

    ^ (self - 2) fib + (self - 1) fib

ワークスペースでの実行結果は

1000 fib "=>43466557686937456435688527675040625802564660517371780402481729089536555417949051890403879840079255169295922593080322634775209689623239873322471161642996440906533187938298969649928516003704476137795166849228875"

Time millisecondsToRun:[1000 fib] "=>0"

速すぎますね。