[CM] clm-3/sound-maxamp/openmcl

[Rick Taube]

sound-maxamp is not working in darwin/openmcl:

Here is what clm-2 returns:

(let ((arry (clm:make-integer-array 4)))
   (clm:sound-maxamp "test.aiff" arry)
   (list (elt arry 0)
         (clm::fix-to-real (elt arry 1))
         (elt arry 2)
         (clm::fix-to-real (elt arry 3))))
=>  (2329 0.2946167 819 0.35604858)

and here is CLM-3

(let ((vals (clm:make-double-array 2))
       (times (clm:make-integer-array 2)))
   (clm:sound-maxamp "test.aiff" 2 vals times)
   (values vals times))
=> #(0.0D0 0.0D0)
    #(2329 819)

im using the latest  tarball of clm-3 from ccrma.

--rick