mirror of
https://github.com/LuaJIT/LuaJIT.git
synced 2025-02-08 07:34:07 +00:00
32 lines
909 B
C
32 lines
909 B
C
|
/*
|
||
|
|
** State and stack handling.
|
||
|
|
** Copyright (C) 2005-2009 Mike Pall. See Copyright Notice in luajit.h
|
||
|
|
*/
|
||
|
|
|
||
|
|
#ifndef _LJ_STATE_H
|
||
|
|
#define _LJ_STATE_H
|
||
|
|
|
||
|
|
#include "lj_obj.h"
|
||
|
|
|
||
|
|
#define incr_top(L) \
|
||
|
|
(++L->top >= L->maxstack && (lj_state_growstack1(L), 0))
|
||
|
|
|
||
|
|
#define savestack(L, p) ((char *)(p) - (char *)L->stack)
|
||
|
|
#define restorestack(L, n) ((TValue *)((char *)L->stack + (n)))
|
||
|
|
|
||
|
|
LJ_FUNC void lj_state_relimitstack(lua_State *L);
|
||
|
|
LJ_FUNC void lj_state_shrinkstack(lua_State *L, MSize used);
|
||
|
|
LJ_FUNCA void lj_state_growstack(lua_State *L, MSize need);
|
||
|
|
LJ_FUNCA void lj_state_growstack1(lua_State *L);
|
||
|
|
|
||
|
|
static LJ_AINLINE void lj_state_checkstack(lua_State *L, MSize need)
|
||
|
|
{
|
||
|
|
if ((MSize)((char *)L->maxstack-(char *)L->top) <= need*(MSize)sizeof(TValue))
|
||
|
|
lj_state_growstack(L, need);
|
||
|
|
}
|
||
|
|
|
||
|
|
LJ_FUNC lua_State *lj_state_new(lua_State *L);
|
||
|
|
LJ_FUNC void LJ_FASTCALL lj_state_free(global_State *g, lua_State *L);
|
||
|
|
|
||
|
|
#endif
|