Skip to main content

luaur_vm/functions/
luau_f_integermod.rs

1use crate::enums::lua_type::lua_Type;
2use crate::macros::lvalue::lvalue;
3use crate::macros::setlvalue::setlvalue;
4use crate::macros::ttisinteger::ttisinteger;
5use crate::type_aliases::lua_state::LuaState;
6use crate::type_aliases::stk_id::StkId;
7use crate::type_aliases::t_value::TValue;
8
9#[allow(non_snake_case)]
10pub unsafe fn luau_f_integermod(
11    _l: *mut LuaState,
12    res: StkId,
13    arg0: *mut TValue,
14    nresults: core::ffi::c_int,
15    args: StkId,
16    nparams: core::ffi::c_int,
17) -> core::ffi::c_int {
18    if nparams >= 2 && nresults <= 1 && ttisinteger!(arg0) && ttisinteger!(args) {
19        let a1: i64 = lvalue!(arg0);
20        let a2: i64 = lvalue!(args);
21
22        if a2 == 0 {
23            return -1;
24        }
25
26        if a1 == i64::MIN && a2 == -1 {
27            setlvalue!(res, 0);
28            return 1;
29        }
30
31        let mut remainder = a1 % a2;
32        if remainder != 0 && (a1 < 0) != (a2 < 0) {
33            remainder += a2;
34        }
35
36        setlvalue!(res, remainder);
37        1
38    } else {
39        -1
40    }
41}