view sched/timer_wait.m @ 61:eff6bddf82e3 tip

Finally implemented perceptual brightness thing.

% timer_wait - Wait for timer to stop running
%
% timer_wait :: timer => void.
% timer_wait :: timer, nonneg ~'time quantum for waiting' => void.
%
% If no wait quantum is supplied, the default is 50ms.

function timer_wait(T,dt)

	if nargin<2, dt=0.05; end
	while isvalid(T) && strcmp(T.Running,'on')
		pause(dt);
	end
end