Function l_obj_timer_stop

src/nhlobj.c:546–572

stop object timer(s). return the turn when timer triggers. returns 0 if no such timer attached to the object. without a timer type parameter, stops all timers for the object. */ local timeout = o:stop_timer("rot-organic"); */ o:stop_timer(); */

/* local timeout = o:stop_timer("rot-organic"); */
/* o:stop_timer(); */
staticfn int
l_obj_timer_stop(lua_State *L)
{
    int argc = lua_gettop(L);

    if (argc == 1) {
        struct _lua_obj *lo = l_obj_check(L, 1);

        if (lo && lo->obj)
            obj_stop_timers(lo->obj);
        return 0;

    } else if (argc == 2) {
        struct _lua_obj *lo = l_obj_check(L, 1);
        short timertype = nhl_get_timertype(L, 2);

        if (timer_is_obj(timertype) && lo && lo->obj) {
            lua_pushinteger(L, stop_timer(timertype, obj_to_any(lo->obj)));
            return 1;
        } else {
            lua_pushinteger(L, 0);
            return 1;
        }
    } else
        nhl_error(L, "l_obj_timer_stop: Wrong args");
    return 0;
}

RESTORE_WARNING_UNREACHABLE_CODE