43 LUALIB_API int luaL_argerror (lua_State *L, int narg, const char *extramsg) {  in luaL_argerror()  argument
46     return luaL_error(L, "bad argument #%d (%s)", narg, extramsg);  in luaL_argerror()
49     narg--;  /* do not count `self' */  in luaL_argerror()
50     if (narg == 0)  /* error is in the self argument itself? */  in luaL_argerror()
57                         narg, ar.name, extramsg);  in luaL_argerror()
61 LUALIB_API int luaL_typerror (lua_State *L, int narg, const char *tname) {  in luaL_typerror()  argument
63                                     tname, luaL_typename(L, narg));  in luaL_typerror()
64   return luaL_argerror(L, narg, msg);  in luaL_typerror()
68 static void tag_error (lua_State *L, int narg, int tag) {  in tag_error()  argument
69   luaL_typerror(L, narg, lua_typename(L, tag));  in tag_error()
99 LUALIB_API int luaL_checkoption (lua_State *L, int narg, const char *def,  in luaL_checkoption()  argument
101   const char *name = (def) ? luaL_optstring(L, narg, def) :  in luaL_checkoption()
102                              luaL_checkstring(L, narg);  in luaL_checkoption()
107   return luaL_argerror(L, narg,  in luaL_checkoption()
146 LUALIB_API void luaL_checktype (lua_State *L, int narg, int t) {  in luaL_checktype()  argument
147   if (lua_type(L, narg) != t)  in luaL_checktype()
148     tag_error(L, narg, t);  in luaL_checktype()
152 LUALIB_API void luaL_checkany (lua_State *L, int narg) {  in luaL_checkany()  argument
153   if (lua_type(L, narg) == LUA_TNONE)  in luaL_checkany()
154     luaL_argerror(L, narg, "value expected");  in luaL_checkany()
158 LUALIB_API const char *luaL_checklstring (lua_State *L, int narg, size_t *len) {  in luaL_checklstring()  argument
159   const char *s = lua_tolstring(L, narg, len);  in luaL_checklstring()
160   if (!s) tag_error(L, narg, LUA_TSTRING);  in luaL_checklstring()
165 LUALIB_API const char *luaL_optlstring (lua_State *L, int narg,  in luaL_optlstring()  argument
167   if (lua_isnoneornil(L, narg)) {  in luaL_optlstring()
172   else return luaL_checklstring(L, narg, len);  in luaL_optlstring()
176 LUALIB_API lua_Number luaL_checknumber (lua_State *L, int narg) {  in luaL_checknumber()  argument
177   lua_Number d = lua_tonumber(L, narg);  in luaL_checknumber()
178   if (d == 0 && !lua_isnumber(L, narg))  /* avoid extra test when d is not 0 */  in luaL_checknumber()
179     tag_error(L, narg, LUA_TNUMBER);  in luaL_checknumber()
184 LUALIB_API lua_Number luaL_optnumber (lua_State *L, int narg, lua_Number def) {  in luaL_optnumber()  argument
185   return luaL_opt(L, luaL_checknumber, narg, def);  in luaL_optnumber()
189 LUALIB_API lua_Integer luaL_checkinteger (lua_State *L, int narg) {  in luaL_checkinteger()  argument
190   lua_Integer d = lua_tointeger(L, narg);  in luaL_checkinteger()
191   if (d == 0 && !lua_isnumber(L, narg))  /* avoid extra test when d is not 0 */  in luaL_checkinteger()
192     tag_error(L, narg, LUA_TNUMBER);  in luaL_checkinteger()
197 LUALIB_API lua_Integer luaL_optinteger (lua_State *L, int narg,  in luaL_optinteger()  argument
199   return luaL_opt(L, luaL_checkinteger, narg, def);  in luaL_optinteger()