luaur-vm 0.1.3

The Luau register virtual machine and standard library (Rust).
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46

use crate::enums::lua_type::lua_Type;
use crate::functions::lua_h_getnum::lua_h_getnum;
use crate::functions::lua_l_checkany::lua_l_checkany;
use crate::functions::lua_l_checktype::lua_l_checktype;
use crate::functions::lua_l_optinteger::lua_l_optinteger;
use crate::functions::lua_pushinteger::lua_pushinteger;
use crate::functions::lua_pushnil::lua_pushnil;
use crate::macros::equalobj::equalobj;
use crate::macros::hvalue::hvalue;
use crate::macros::ttisnil::ttisnil;
use crate::type_aliases::lua_state::lua_State;
use crate::type_aliases::stk_id::StkId;
use crate::type_aliases::t_value::TValue;

#[no_mangle]
#[allow(non_snake_case)]
pub unsafe fn tfind(L: *mut lua_State) -> core::ffi::c_int {
    lua_l_checktype(L, 1, lua_Type::LUA_TTABLE as core::ffi::c_int);
    lua_l_checkany(L, 2);
    let init = lua_l_optinteger(L, 3, 1);
    if init < 1 {
        // The dependency card for lua_l_argerror_l shows it takes &str.
        crate::functions::lua_l_argerror_l::lua_l_argerror_l(L, 3, "index out of range");
    }

    let t = hvalue!((*L).base);

    let mut i = init;
    loop {
        let e: *const TValue = lua_h_getnum(t, i);
        if ttisnil!(e) {
            break;
        }

        let v: StkId = (*L).base.offset(1);

        if equalobj!(L, v, e) {
            lua_pushinteger(L, i);
            return 1;
        }
        i += 1;
    }

    lua_pushnil(L);
    1
}