# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1327322977 25200
# Node ID 32c69ba451d92788b57b2d6491dbff343b4609e4
# Parent  cdf320cb594996fcd497ccbb3cdf728d19aa9411
fixed bug where sound-processor would generate too many floats

diff -r cdf320cb5949 -r 32c69ba451d9 org/ear.org
--- a/org/ear.org	Sat Dec 10 21:42:50 2011 -0600
+++ b/org/ear.org	Mon Jan 23 05:49:37 2012 -0700
@@ -773,11 +773,11 @@
     (process
       [#^ByteBuffer audioSamples numSamples #^AudioFormat audioFormat]
       (let [bytes  (byte-array numSamples)
-            floats (float-array numSamples)]
+            num-floats (/ numSamples  (.getFrameSize audioFormat))
+            floats (float-array num-floats)]
         (.get audioSamples bytes 0 numSamples)
         (FloatSampleTools/byte2floatInterleaved
-         bytes 0 floats 0
-         (/ numSamples (.getFrameSize audioFormat)) audioFormat)
+         bytes 0 floats 0 num-floats audioFormat)
         (continuation
          (vec floats))))))