I've just found 'select-sound' .... but its throwing an error:
misc-error: (#f Wrong type to apply: ~S (1) #f)
this is the code:
(let ((insound (open-sound fullfilename)))
(display (format #f "Currently selected Sound
is ~D \n" (selected-sound)))
(let ((outsound (new-sound "out.snd" :channels 4)))
(display (format #f "Currently selected Sound
is ~D \n" (selected-sound)))
select-sound(insound);
(display (format #f "Currently selected Sound
is ~D \n" (selected-sound)))
_______________________________________________
Cmdist mailing list
[email protected]
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist
