Function spot_stop_timers

src/timeout.c:2415–2438

* Stop all timers of index func_index at this spot. * */

 *
 */
void
spot_stop_timers(coordxy x, coordxy y, short func_index)
{
    timeout_proc cleanup_func;
    timer_element *curr, *prev, *next_timer = 0;
    long where = (((long) x << 16) | ((long) y));

    for (prev = 0, curr = gt.timer_base; curr; curr = next_timer) {
        next_timer = curr->next;
        if (curr->kind == TIMER_LEVEL && curr->func_index == func_index
            && curr->arg.a_long == where) {
            if (prev)
                prev->next = curr->next;
            else
                gt.timer_base = curr->next;
            if ((cleanup_func = timeout_funcs[curr->func_index].cleanup) != 0)
                (*cleanup_func)(&curr->arg, curr->timeout);
            (void) memset((genericptr_t) curr, 0, sizeof(timer_element));
            free((genericptr_t) curr);
        } else {
            prev = curr;
        }
    }
}

/*
 * When is the spot timer of type func_index going to expire?