view arrows/adata.m @ 2:7357e1dc2ad6

Simplified scheduler library with new schedule representation.

% adata - Arrow to generate stream from lazy sequence object
%
% adata :: seq(A) -> arrow( {}, {A}, seq(A)).
function a=adata(X)
	a=unfolder(@decons1,X);
end

function [h,t]=decons1(x)
	if isempty(x), error('ARROW:EOF','End of data sequence'); end
	[h,t]=decons(x);
end