luaur_vm/functions/
lua_insert.rs1use core::ffi::c_int;
5
6use crate::functions::index_2_addr::index2addr;
7use crate::functions::lua_concat::lua_c_threadbarrier_lapi;
8use crate::macros::api_check::api_check;
9use crate::macros::lua_o_nilobject::luaO_nilobject;
10use crate::macros::setobj_2_s::setobj2s;
11use crate::type_aliases::lua_state::lua_State;
12use crate::type_aliases::stk_id::StkId;
13
14#[allow(non_snake_case)]
15pub unsafe fn lua_insert(L: *mut lua_State, idx: c_int) {
16 lua_c_threadbarrier_lapi(L);
17 let p: StkId = index2addr(L, idx);
18 api_check!(L, p != luaO_nilobject as StkId);
19
20 let mut q = (*L).top;
21 while q > p {
22 setobj2s!(L, q, q.sub(1));
23 q = q.sub(1);
24 }
25 setobj2s!(L, p, (*L).top);
26}