[PlanetCCRMA] snd 9.10 outa problem

[Juan I Reyes]

Hi Nando, 

FTR, while trying to run a simple example on PlanetCCRMA's Snd-guile
x86_x64 version 9.10, I am getting the following error:

>(load "simple.cms")
#<unspecified>
>(with-sound () (simp 0 1 1000 0.75))

outa: out-of-range: is infinite (0.0)
; run
>"test.snd"
>

If i try Snd-guile version 10 (compiled from sources) I don't get the
same error. Perhaps it was a bug in that version number.

The Scheme file I am trying is the canonical simple oscillator program:

(provide 'snd-clm-ins.scm)

(if (not (provided? 'snd-ws.scm)) (load-from-path "ws.scm"))
(if (not (provided? 'snd-env.scm)) (load-from-path "env.scm"))
(if (not (provided? 'ws.scm)) (load-from-path "ws.scm"))

(definstrument (simp beg dur freq amp)
  (let* ((os (make-oscil freq))
(start (seconds->samples beg))
(end (+ start (seconds->samples dur))))
    (run
      (lambda ()
        (do ((i start (1+ i))) 
            ((= i end))
          (outa i (* amp (oscil os)) *output*)
  )))))