Kimura Fuyuki
fuyuk****@nigre*****
2004年 1月 17日 (土) 16:11:51 JST
At Fri, 16 Jan 2004 18:47:14 -1000 (HST), Shiro Kawai <shiro****@lava*****> wrote: > > sloppyなスタック操作のコードが元凶でした。 > 深い再帰が極端に遅くなる問題と同根です。 > このパッチを試してみて下さい。 うわ、対応はや… letの問題が解決したばかりか、再帰の高速化までなされていますね。(x10!) どうもありがとうございました。 $ /usr/bin/time gosh -e '(let l ((n 0)) (or (let ((n n)) (if (< n 10000) (l (+ n 1)))) #f))' -Eexit 0.48 real 0.42 user 0.05 sys -- 木村 冬樹
