view sched/timer_wait.m @ 44:3cedfd4549ef

Code added since initial check in.

% 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