src/lj_state.h

   1 /*
   2 ** State and stack handling.
   3 ** Copyright (C) 2005-2013 Mike Pall. See Copyright Notice in luajit.h
   4 */
   5
   6 #ifndef _LJ_STATE_H
   7 #define _LJ_STATE_H
   8
   9 #include "lj_obj.h"
  10
  11 #define incr_top(L) \
  12   (++L->top >= tvref(L->maxstack) && (lj_state_growstack1(L), 0))
  13
  14 #define savestack(L, p)         ((char *)(p) - mref(L->stack, char))
  15 #define restorestack(L, n)      ((TValue *)(mref(L->stack, char) + (n)))
  16
  17 LJ_FUNC void lj_state_relimitstack(lua_State *L);
  18 LJ_FUNC void lj_state_shrinkstack(lua_State *L, MSize used);
  19 LJ_FUNCA void LJ_FASTCALL lj_state_growstack(lua_State *L, MSize need);
  20 LJ_FUNC void LJ_FASTCALL lj_state_growstack1(lua_State *L);
  21
  22 static LJ_AINLINE void lj_state_checkstack(lua_State *L, MSize need)
  23 {
  24   if ((mref(L->maxstack, char) - (char *)L->top) <=
  25       (ptrdiff_t)need*(ptrdiff_t)sizeof(TValue))
  26     lj_state_growstack(L, need);
  27 }
  28
  29 LJ_FUNC lua_State *lj_state_new(lua_State *L);
  30 LJ_FUNC void LJ_FASTCALL lj_state_free(global_State *g, lua_State *L);
  31 #if LJ_64
  32 LJ_FUNC lua_State *lj_state_newstate(lua_Alloc f, void *ud);
  33 #endif
  34
  35 #endif