aboutsummaryrefslogtreecommitdiff
path: root/lauxlib.h
diff options
context:
space:
mode:
Diffstat (limited to 'lauxlib.h')
-rw-r--r--lauxlib.h12
1 files changed, 8 insertions, 4 deletions
diff --git a/lauxlib.h b/lauxlib.h
index 360dea13..24a6dbaf 100644
--- a/lauxlib.h
+++ b/lauxlib.h
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lauxlib.h,v 1.120 2011/11/29 15:55:08 roberto Exp roberto $ 2** $Id: lauxlib.h,v 1.121 2013/06/25 14:05:26 roberto Exp roberto $
3** Auxiliary functions for building Lua libraries 3** Auxiliary functions for building Lua libraries
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -26,8 +26,11 @@ typedef struct luaL_Reg {
26} luaL_Reg; 26} luaL_Reg;
27 27
28 28
29LUALIB_API void (luaL_checkversion_) (lua_State *L, lua_Number ver); 29#define LUAL_NUMSIZES (sizeof(lua_Integer)*16 + sizeof(lua_Number))
30#define luaL_checkversion(L) luaL_checkversion_(L, LUA_VERSION_NUM) 30
31LUALIB_API void (luaL_checkversion_) (lua_State *L, int ver, size_t sz);
32#define luaL_checkversion(L) \
33 luaL_checkversion_(L, LUA_VERSION_NUM, LUAL_NUMSIZES)
31 34
32LUALIB_API int (luaL_getmetafield) (lua_State *L, int obj, const char *e); 35LUALIB_API int (luaL_getmetafield) (lua_State *L, int obj, const char *e);
33LUALIB_API int (luaL_callmeta) (lua_State *L, int obj, const char *e); 36LUALIB_API int (luaL_callmeta) (lua_State *L, int obj, const char *e);
@@ -108,7 +111,8 @@ LUALIB_API void (luaL_requiref) (lua_State *L, const char *modname,
108#define luaL_newlibtable(L,l) \ 111#define luaL_newlibtable(L,l) \
109 lua_createtable(L, 0, sizeof(l)/sizeof((l)[0]) - 1) 112 lua_createtable(L, 0, sizeof(l)/sizeof((l)[0]) - 1)
110 113
111#define luaL_newlib(L,l) (luaL_newlibtable(L,l), luaL_setfuncs(L,l,0)) 114#define luaL_newlib(L,l) \
115 (luaL_checkversion(L), luaL_newlibtable(L,l), luaL_setfuncs(L,l,0))
112 116
113#define luaL_argcheck(L, cond,numarg,extramsg) \ 117#define luaL_argcheck(L, cond,numarg,extramsg) \
114 ((void)((cond) || luaL_argerror(L, (numarg), (extramsg)))) 118 ((void)((cond) || luaL_argerror(L, (numarg), (extramsg))))