[CM] Selecting a sound

[e deleflie]

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)))