LISP Scheme Part5
■ このスレッドは過去ログ倉庫に格納されています
0346343
NGNGあ、そういうことか。
ポータブルに書くのは難しいけど、gaucheならこんな感じでどう?
sys-selectはタイミング調整ね。
(define (come!)
(for-each (lambda (x) (display x) (display "\r") (flush) (sys-select #f #f #f 200000))
'((゚∀゚_) (∀゚ ) (゚ ) ( _ ) ( ゚) ( ゚∀) (_゚∀゚)))
(come!)
■ このスレッドは過去ログ倉庫に格納されています