i note that the sox command for this is still the winner if we're just counting brevity.
On Thu, Jan 17, 2013 at 10:24 AM, Kjetil Matheussen <k.s.matheussen@xxxxxxxxxx> wrote:
Bill Schottstaedt:Can't get my head around 'do'. Prefer this:
(call-with-output-file "test.ascii" (lambda (p)
(let ((r (make-readin "filename.wav")))
(do () ((= (mus-location r) (mus-length r)))
(format p "~A~%" (r))))))
(while (< (mus-location r) (mus-length r))
(call-with-output-file "test.ascii" (lambda (p)
(let ((r (make-readin "filename.wav")))
(format p "~A~%" (r))))))
_______________________________________________
Linux-audio-user mailing list
Linux-audio-user@lists.linuxaudio.org
http://lists.linuxaudio.org/listinfo/linux-audio-user
_______________________________________________ Linux-audio-user mailing list Linux-audio-user@xxxxxxxxxxxxxxxxxxxx http://lists.linuxaudio.org/listinfo/linux-audio-user