view sched/timer_wait.m @ 6:0ce3c2070089

Removed duplicate code and fixed doc in timed_action.

% 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