R4.1 のフィボナッチベンチの結果は極めて良好です。 下記のソースで、 Integer>>fib self < 2 ifTrue: [^ self]. ^ (self - 2) fib + (self - 1) fib ワークスペースでの実行結果は 1000 fib "=>43466557686937456435688527675040625802564660517371780402481729089536555417949051890403879840079255169295922593080322634775209689623239873322471161642996440906533187938298969649928516003704476137795166849228875" Time millisecondsToRun:[1000 fib] "=>0" 速すぎますね。 |
お知らせ >