[CM] Sbcl and realtime cm

Rick Taube taube@uiuc.edu
Fri, 6 Oct 2006 12:44:42 -0500

> I am able to get portmidi to spit out midi processes, but the  
> timing will get screwed up or the notes will not all come out.

i switched over to sbcl 0.9.17 and ran a non-consing simp for 5000  
events at .1 sec rate (thats 8'20" sec o' fun...) and the timing  
sounded rock solid. so im stumped as to why you are getting poor timing.

(defun ncsimp (num rhy key wid)
   (let ((m (new midi :amplitude 80 :duration 90)))
     (process for i below num
                  do (sv m :keynum (rts:between key (+ wid  
key)) :time (now))
                  output  m
                  wait rhy)))

;; nonconsing output test
(rts pm :time-format :msec)
(sprout (ncsimp 5000 100 70 12))