toru
toru****@gwaih*****
2004年 8月 15日 (日) 01:36:51 JST
久井です。 > On Aug 14, 2004, at 10:12 AM, toru wrote: > > (let ((r (logand (ash x -10) 62)) > > (g (logand (ash x -5) 63)) > > (b (logand (ash x 1) 62))) > > (print #`",r ,g ,b"))) > > この print を > > (display r) > (display " ") > (display g) > (display " ") > (display b) > (newline) > > に書き換えると、GC の対象になる文字列が少なくなって > ちょっとは速くなるかもしれないです。 おお、たしかに 25% ほど時間が短縮されました。 しかしそれでも 30 秒もかかる……。 -- と お る 。 toru at gwaihir dot biz http://torus.jp/
