local _add_task = server.add_task;
+local _active_timers = 0;
local h = indexedbheap.create();
local params = {};
local next_time = nil;
params[_id] = _param;
end
end
- next_time = peek;
- if peek ~= nil then
+
+ if peek ~= nil and _active_timers > 1 and peek == next_time then
+ -- Another instance of _on_timer already set next_time to the same value,
+ -- so it should be safe to not renew this timer event
+ peek = nil;
+ else
+ next_time = peek;
+ end
+
+ if peek then
+ -- peek is the time of the next event
return peek - now;
end
+ _active_timers = _active_timers - 1;
end
local function add_task(delay, callback, param)
local current_time = get_time();
params[id] = param;
if next_time == nil or event_time < next_time then
next_time = event_time;
+ _active_timers = _active_timers + 1;
_add_task(next_time - current_time, _on_timer);
end
return id;