The Battle for Wesnoth  1.15.12+dev
Go to the documentation of this file.
1 /*
2 ** $Id: ldo.h $
3 ** Stack and Call structure of Lua
4 ** See Copyright Notice in lua.h
5 */
7 #ifndef ldo_h
8 #define ldo_h
11 #include "lobject.h"
12 #include "lstate.h"
13 #include "lzio.h"
16 /*
17 ** Macro to check stack size and grow stack if needed. Parameters
18 ** 'pre'/'pos' allow the macro to preserve a pointer into the
19 ** stack across reallocations, doing the work only when needed.
20 ** It also allows the running of one GC step when the stack is
21 ** reallocated.
22 ** 'condmovestack' is used in heavy tests to force a stack reallocation
23 ** at every check.
24 */
25 #define luaD_checkstackaux(L,n,pre,pos) \
26  if (L->stack_last - L->top <= (n)) \
27  { pre; luaD_growstack(L, n, 1); pos; } \
28  else { condmovestack(L,pre,pos); }
30 /* In general, 'pre'/'pos' are empty (nothing to save) */
31 #define luaD_checkstack(L,n) luaD_checkstackaux(L,n,(void)0,(void)0)
35 #define savestack(L,p) ((char *)(p) - (char *)L->stack)
36 #define restorestack(L,n) ((StkId)((char *)L->stack + (n)))
39 /* macro to check stack size, preserving 'p' */
40 #define checkstackGCp(L,n,p) \
41  luaD_checkstackaux(L, n, \
42  ptrdiff_t t__ = savestack(L, p); /* save 'p' */ \
43  luaC_checkGC(L), /* stack grow uses memory */ \
44  p = restorestack(L, t__)) /* 'pos' part: restore 'p' */
47 /* macro to check stack size and GC */
48 #define checkstackGC(L,fsize) \
49  luaD_checkstackaux(L, (fsize), luaC_checkGC(L), (void)0)
52 /* type of protected functions, to be ran by 'runprotected' */
53 typedef void (*Pfunc) (lua_State *L, void *ud);
55 LUAI_FUNC void luaD_seterrorobj (lua_State *L, int errcode, StkId oldtop);
56 LUAI_FUNC int luaD_protectedparser (lua_State *L, ZIO *z, const char *name,
57  const char *mode);
58 LUAI_FUNC void luaD_hook (lua_State *L, int event, int line,
59  int fTransfer, int nTransfer);
61 LUAI_FUNC void luaD_pretailcall (lua_State *L, CallInfo *ci, StkId func, int n);
62 LUAI_FUNC CallInfo *luaD_precall (lua_State *L, StkId func, int nResults);
63 LUAI_FUNC void luaD_call (lua_State *L, StkId func, int nResults);
64 LUAI_FUNC void luaD_callnoyield (lua_State *L, StkId func, int nResults);
65 LUAI_FUNC void luaD_tryfuncTM (lua_State *L, StkId func);
66 LUAI_FUNC int luaD_pcall (lua_State *L, Pfunc func, void *u,
67  ptrdiff_t oldtop, ptrdiff_t ef);
68 LUAI_FUNC void luaD_poscall (lua_State *L, CallInfo *ci, int nres);
69 LUAI_FUNC int luaD_reallocstack (lua_State *L, int newsize, int raiseerror);
70 LUAI_FUNC int luaD_growstack (lua_State *L, int n, int raiseerror);
74 LUAI_FUNC l_noret luaD_throw (lua_State *L, int errcode);
75 LUAI_FUNC int luaD_rawrunprotected (lua_State *L, Pfunc f, void *ud);
77 #endif
const char * name
Definition: ldo.cpp:808
LUAI_FUNC int luaD_reallocstack(lua_State *L, int newsize, int raiseerror)
Definition: ldo.cpp:184
#define LUAI_FUNC
Definition: luaconf.h:307
LUAI_FUNC void luaD_shrinkstack(lua_State *L)
Definition: ldo.cpp:262
LUAI_FUNC void luaD_seterrorobj(lua_State *L, int errcode, StkId oldtop)
Definition: ldo.cpp:91
LUAI_FUNC void luaD_callnoyield(lua_State *L, StkId func, int nResults)
Definition: ldo.cpp:565
#define l_noret
Definition: llimits.h:178
LUAI_FUNC int luaD_rawrunprotected(lua_State *L, Pfunc f, void *ud)
Definition: ldo.cpp:141
LUAI_FUNC int luaD_protectedparser(lua_State *L, ZIO *z, const char *name, const char *mode)
Definition: ldo.cpp:838
LUAI_FUNC void luaD_poscall(lua_State *L, CallInfo *ci, int nres)
Definition: ldo.cpp:434
LUAI_FUNC void luaD_call(lua_State *L, StkId func, int nResults)
Definition: ldo.cpp:557
LUAI_FUNC void luaD_hook(lua_State *L, int event, int line, int fTransfer, int nTransfer)
Definition: ldo.cpp:294
const char * mode
Definition: ldo.cpp:807
ZIO * z
Definition: ldo.cpp:804
LUAI_FUNC CallInfo * luaD_precall(lua_State *L, StkId func, int nResults)
Definition: ldo.cpp:479
void(* Pfunc)(lua_State *L, void *ud)
Definition: ldo.h:53
LUAI_FUNC l_noret luaD_throw(lua_State *L, int errcode)
Definition: ldo.cpp:114
Definition: lzio.h:55
LUAI_FUNC void luaD_tryfuncTM(lua_State *L, StkId func)
Definition: ldo.cpp:374
LUAI_FUNC void luaD_pretailcall(lua_State *L, CallInfo *ci, StkId func, int n)
Definition: ldo.cpp:452
#define f
LUAI_FUNC int luaD_growstack(lua_State *L, int n, int raiseerror)
Definition: ldo.cpp:207
LUAI_FUNC void luaD_hookcall(lua_State *L, CallInfo *ci)
Definition: ldo.cpp:333
LUAI_FUNC int luaD_pcall(lua_State *L, Pfunc func, void *u, ptrdiff_t oldtop, ptrdiff_t ef)
Definition: ldo.cpp:777
static map_location::DIRECTION n
LUAI_FUNC void luaD_inctop(lua_State *L)
Definition: ldo.cpp:281