20 #define LUA_ERRFILE (LUA_ERRERR+1)
29 #define LUAL_NUMSIZES (sizeof(lua_Integer)*16 + sizeof(lua_Number))
32 #define luaL_checkversion(L) \
33 luaL_checkversion_(L, LUA_VERSION_NUM, LUAL_NUMSIZES)
42 const char *def,
size_t *l);
63 const char *
const lst[]);
69 #define LUA_NOREF (-2)
70 #define LUA_REFNIL (-1)
78 #define luaL_loadfile(L,f) luaL_loadfilex(L,f,NULL)
81 const char *name,
const char *mode);
96 const char *msg,
int level);
108 #define luaL_newlibtable(L,l) \
109 lua_createtable(L, 0, sizeof(l)/sizeof((l)[0]) - 1)
111 #define luaL_newlib(L,l) \
112 (luaL_checkversion(L), luaL_newlibtable(L,l), luaL_setfuncs(L,l,0))
114 #define luaL_argcheck(L, cond,arg,extramsg) \
115 ((void)((cond) || luaL_argerror(L, (arg), (extramsg))))
116 #define luaL_checkstring(L,n) (luaL_checklstring(L, (n), NULL))
117 #define luaL_optstring(L,n,d) (luaL_optlstring(L, (n), (d), NULL))
119 #define luaL_typename(L,i) lua_typename(L, lua_type(L,(i)))
121 #define luaL_dofile(L, fn) \
122 (luaL_loadfile(L, fn) || lua_pcall(L, 0, LUA_MULTRET, 0))
124 #define luaL_dostring(L, s) \
125 (luaL_loadstring(L, s) || lua_pcall(L, 0, LUA_MULTRET, 0))
127 #define luaL_getmetatable(L,n) (lua_getfield(L, LUA_REGISTRYINDEX, (n)))
129 #define luaL_opt(L,f,n,d) (lua_isnoneornil(L,(n)) ? (d) : f(L,(n)))
131 #define luaL_loadbuffer(L,s,sz,n) luaL_loadbufferx(L,s,sz,n,NULL)
149 #define luaL_addchar(B,c) \
150 ((void)((B)->n < (B)->size || luaL_prepbuffsize((B), 1)), \
151 ((B)->b[(B)->n++] = (c)))
153 #define luaL_addsize(B,s) ((B)->n += (s))
164 #define luaL_prepbuffer(B) luaL_prepbuffsize(B, LUAL_BUFFERSIZE)
182 #define LUA_FILEHANDLE "FILE*"
195 #if defined(LUA_COMPAT_MODULE)
202 #define luaL_register(L,n,l) (luaL_openlib(L,(n),(l),0))
214 #if !defined(lua_writestring)
215 #define lua_writestring(s,l) fwrite((s), sizeof(char), (l), stdout)
219 #if !defined(lua_writeline)
220 #define lua_writeline() (lua_writestring("\n", 1), fflush(stdout))
224 #if !defined(lua_writestringerror)
225 #define lua_writestringerror(s,p) \
226 (fprintf(stderr, (s), (p)), fflush(stderr))
237 #if defined(LUA_COMPAT_APIINTCASTS)
239 #define luaL_checkunsigned(L,a) ((lua_Unsigned)luaL_checkinteger(L,a))
240 #define luaL_optunsigned(L,a,d) \
241 ((lua_Unsigned)luaL_optinteger(L,a,(lua_Integer)(d)))
243 #define luaL_checkint(L,n) ((int)luaL_checkinteger(L, (n)))
244 #define luaL_optint(L,n,d) ((int)luaL_optinteger(L, (n), (d)))
246 #define luaL_checklong(L,n) ((long)luaL_checkinteger(L, (n)))
247 #define luaL_optlong(L,n,d) ((long)luaL_optinteger(L, (n), (d)))
LUALIB_API void() luaL_requiref(lua_State *L, const char *modname, lua_CFunction openf, int glb)
LUALIB_API void() luaL_checkversion_(lua_State *L, lua_Number ver, size_t sz)
LUALIB_API int() luaL_argerror(lua_State *L, int arg, const char *extramsg)
LUALIB_API void() luaL_checkstack(lua_State *L, int sz, const char *msg)
LUALIB_API int() luaL_fileresult(lua_State *L, int stat, const char *fname)
LUALIB_API const char *() luaL_checklstring(lua_State *L, int arg, size_t *l)
LUALIB_API void() luaL_setfuncs(lua_State *L, const luaL_Reg *l, int nup)
LUALIB_API void() luaL_unref(lua_State *L, int t, int ref)
LUALIB_API void() luaL_addlstring(luaL_Buffer *B, const char *s, size_t l)
LUALIB_API void() luaL_traceback(lua_State *L, lua_State *L1, const char *msg, int level)
struct luaL_Stream luaL_Stream
LUALIB_API lua_Number() luaL_optnumber(lua_State *L, int arg, lua_Number def)
LUALIB_API int() luaL_execresult(lua_State *L, int stat)
LUALIB_API void() luaL_where(lua_State *L, int lvl)
LUALIB_API void() luaL_checkany(lua_State *L, int arg)
LUALIB_API const char *() luaL_gsub(lua_State *L, const char *s, const char *p, const char *r)
char initb[LUAL_BUFFERSIZE]
int(* lua_CFunction)(lua_State *L)
struct luaL_Buffer luaL_Buffer
LUALIB_API int() luaL_checkoption(lua_State *L, int arg, const char *def, const char *const lst[])
LUALIB_API const char *() luaL_optlstring(lua_State *L, int arg, const char *def, size_t *l)
LUALIB_API char *() luaL_buffinitsize(lua_State *L, luaL_Buffer *B, size_t sz)
LUALIB_API int() luaL_ref(lua_State *L, int t)
struct lua_State lua_State
LUALIB_API int() luaL_callmeta(lua_State *L, int obj, const char *e)
LUALIB_API lua_Integer() luaL_len(lua_State *L, int idx)
LUALIB_API int() luaL_loadfilex(lua_State *L, const char *filename, const char *mode)
LUALIB_API lua_State *() luaL_newstate(void)
LUALIB_API void() luaL_pushresult(luaL_Buffer *B)
LUALIB_API void() luaL_checktype(lua_State *L, int arg, int t)
LUALIB_API int() luaL_loadstring(lua_State *L, const char *s)
LUALIB_API void() luaL_addstring(luaL_Buffer *B, const char *s)
LUALIB_API int() luaL_getsubtable(lua_State *L, int idx, const char *fname)
LUALIB_API int() luaL_error(lua_State *L, const char *fmt,...)
LUALIB_API char *() luaL_prepbuffsize(luaL_Buffer *B, size_t sz)
LUALIB_API int() luaL_newmetatable(lua_State *L, const char *tname)
LUALIB_API lua_Number() luaL_checknumber(lua_State *L, int arg)
LUALIB_API void() luaL_pushresultsize(luaL_Buffer *B, size_t sz)
LUALIB_API void *() luaL_testudata(lua_State *L, int ud, const char *tname)
LUALIB_API void() luaL_addvalue(luaL_Buffer *B)
LUALIB_API int() luaL_loadbufferx(lua_State *L, const char *buff, size_t sz, const char *name, const char *mode)
LUALIB_API int() luaL_getmetafield(lua_State *L, int obj, const char *e)
LUALIB_API void() luaL_buffinit(lua_State *L, luaL_Buffer *B)
LUALIB_API const char *() luaL_tolstring(lua_State *L, int idx, size_t *len)
LUALIB_API lua_Integer() luaL_optinteger(lua_State *L, int arg, lua_Integer def)
LUALIB_API void *() luaL_checkudata(lua_State *L, int ud, const char *tname)
LUALIB_API lua_Integer() luaL_checkinteger(lua_State *L, int arg)
LUALIB_API void() luaL_setmetatable(lua_State *L, const char *tname)