another CLM locsig question

[Mari]

Sorry if this is really dumb, but I don't understand why the following 
instrument doesn't work.  It compiles and loads all right, but when I try
to use it, all it does is make an output file of complete silence.  At 
least it makes the right number of seconds of silence...


( definstrument locsig-test ( start-time duration file
	
    &key
    ( degree 45 )
    ( distance 1 )
    ( reverb-amount .05 ))

    ( let*
        ( ( beg ( floor ( * start-time sampling-rate )))
        ( end ( floor ( * duration sampling-rate )))
        ( f ( open-input file ))
        ( loc ( make-locsig :degree degree 
                            :distance distance
                            :revscale reverb-amount )))

	
    ( run
        ( loop for i from beg to end do
            ( locsig loc i f )))

    ( close-input f )))
			


Thanks,
Mari

..................................
 Mari Masuda * mbmasuda@colby.edu
 www.colby.edu/personal/mbmasuda/
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^