KIMURA Shigenobu
skimu****@mac*****
2004年 8月 15日 (日) 01:25:57 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 の対象になる文字列が少なくなって ちょっとは速くなるかもしれないです。 --skimu