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)))) |
