Function stop_timer

src/timeout.c:2298–2318

* Remove the timer from the current list and free it up. Return the time * remaining until it would have gone off, 0 if not found. */

 * remaining until it would have gone off, 0 if not found.
 */
long
stop_timer(short func_index, anything *arg)
{
    timeout_proc cleanup_func;
    timer_element *doomed;
    long timeout;

    doomed = remove_timer(&gt.timer_base, func_index, arg);

    if (doomed) {
        timeout = doomed->timeout;
        if (doomed->kind == TIMER_OBJECT)
            (arg->a_obj)->timed--;
        if ((cleanup_func = timeout_funcs[doomed->func_index].cleanup) != 0)
            (*cleanup_func)(arg, timeout);
        (void) memset((genericptr_t) doomed, 0, sizeof(timer_element));
        free((genericptr_t) doomed);
        return (timeout - svm.moves);
    }
    return 0L;
}

/*
 * Find the timeout of specified timer; return 0 if none.