diff options
Diffstat (limited to 'lauxlib.h')
-rw-r--r-- | lauxlib.h | 12 |
1 files changed, 8 insertions, 4 deletions
@@ -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 | ||
29 | LUALIB_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 | |
31 | LUALIB_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 | ||
32 | LUALIB_API int (luaL_getmetafield) (lua_State *L, int obj, const char *e); | 35 | LUALIB_API int (luaL_getmetafield) (lua_State *L, int obj, const char *e); |
33 | LUALIB_API int (luaL_callmeta) (lua_State *L, int obj, const char *e); | 36 | LUALIB_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)))) |