samer@43: % pipesink - sink which writes audio signal to shell pipeline.
samer@43: % pipesink :: C:natural, R:nonneg, string, options(wavsink) -> sink(C,R).
samer@0: function s=pipesink(ch,rate,cmd,varargin)
samer@0: 	str=sprintf('pipesink(''%s'')',cmd);
samer@0: 	s=wavsink(ch,rate,@()pipeout(cmd),@()str,varargin{:});
samer@0: end
samer@0: 
samer@0: