samer@0: % sinknull - A sink that discards all data
samer@0: %
samer@0: % sinknull :: C:natural -> sink(C,_).
samer@0: % sinknull :: C:natural, R:nonneg -> sink(C,R).
samer@3: classdef sinknull < sinkbase
samer@0: 	methods
samer@0: 		function s=sinknull(channels,rate)
samer@0: 			if nargin<2, rate=nan; end
samer@0: 			if nargin<1, channels=nan; end
samer@3: 			s=struct@sinkbase(channels,rate);
samer@0: 		end
samer@0: 		function s=tostring(sig), s='sinknull'; end
samer@0: 		function s=construct(sig)
samer@0: 			s.start   = @nop;
samer@0: 			s.stop    = @nop;
samer@0: 			s.dispose = @nop;
samer@0: 			s.writer  = @(n)@(x)0;
samer@0: 		end
samer@0: 	end
samer@0: end