<div dir="ltr"> i note that the sox command for this is still the winner if we're just counting brevity.<br></div><div class="gmail_extra"><br><br><div class="gmail_quote">On Thu, Jan 17, 2013 at 10:24 AM, Kjetil Matheussen <span dir="ltr"><<a href="mailto:k.s.matheussen@notam02.no" target="_blank">k.s.matheussen@notam02.no</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Bill Schottstaedt:<div class="im"><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
(call-with-output-file "test.ascii" (lambda (p)<br>
 (let ((r (make-readin "filename.wav")))<br>
   (do () ((= (mus-location r) (mus-length r)))<br>
     (format p "~A~%" (r))))))<br>
</blockquote>
<br></div>
Can't get my head around 'do'. Prefer this:<div class="im"><br>
<br>
(call-with-output-file "test.ascii" (lambda (p)<br>
  (let ((r (make-readin "filename.wav")))<br></div>
    (while (< (mus-location r) (mus-length r))<br>
      (format p "~A~%" (r))))))<div class="HOEnZb"><div class="h5"><br>
<br>
<br>
______________________________<u></u>_________________<br>
Linux-audio-user mailing list<br>
<a href="mailto:Linux-audio-user@lists.linuxaudio.org" target="_blank">Linux-audio-user@lists.<u></u>linuxaudio.org</a><br>
<a href="http://lists.linuxaudio.org/listinfo/linux-audio-user" target="_blank">http://lists.linuxaudio.org/<u></u>listinfo/linux-audio-user</a><br>
</div></div></blockquote></div><br></div>