Still hacking away... (time (with-sound () (fm-violin 0 20 440 .1))) sbcl: 0.197 Snd+s7: 0.218
(time (with-sound (:reverb jc-reverb) (fm-violin 0 20 440 .1))) sbcl: 0.433 Snd+s7: 0.425 (time (with-sound () (do ((i 0 (+ i 1))) ((= i 10000)) (fm-violin (* i .001) .01 440 .001)))) sbcl: 1.607 Snd+s7: 1.683 (time (load "popi.scm")) or (time (load "popi.clm")) sbcl: 1.185 Snd+s7: 1.315 (time (with-sound () (p 0 3))) or (time (with-sound () (p 0 :duration 3.0))) sbcl: 0.321 Snd+s7: 1.122 (time (with-sound () (expandn 0 10 "oboe.snd" 1 :expand 4))) sbcl: 0.096 Snd+s7: 0.232 (time (with-sound () (singer 0 .1 (list (list .4 ehh.shp test.glt 523.0 .8 0.0 .0 1) (list .6 oo.shp test.glt 523.0 .7 .1 .01))))) sbcl: 0.072 Snd+s7: 0.225 (time (with-sound () (pins 0 3 "oboe.snd" 1.0 :max-peaks 8))) sbcl: 0.064 Snd+s7: 0.233 But these "time" results are all over the map -- treat with the usual skepticism. _______________________________________________ Cmdist mailing list [email protected] http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist
