luaur_vm/functions/
luau_f_integermod.rs1use 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}