146 LUALIB_API int luaL_argerror (lua_State *L, int narg, const char *extramsg) {  in luaL_argerror()  argument
149     return luaL_error(L, "bad argument #%d (%s)", narg, extramsg);  in luaL_argerror()
152     narg--;  /* do not count `self' */  in luaL_argerror()
153     if (narg == 0)  /* error is in the self argument itself? */  in luaL_argerror()
160                         narg, ar.name, extramsg);  in luaL_argerror()
164 static int typeerror (lua_State *L, int narg, const char *tname) {  in typeerror()  argument
166                                     tname, luaL_typename(L, narg));  in typeerror()
167   return luaL_argerror(L, narg, msg);  in typeerror()
171 static void tag_error (lua_State *L, int narg, int tag) {  in tag_error()  argument
172   typeerror(L, narg, lua_typename(L, tag));  in tag_error()
279 LUALIB_API int luaL_checkoption (lua_State *L, int narg, const char *def,  in luaL_checkoption()  argument
281   const char *name = (def) ? luaL_optstring(L, narg, def) :  in luaL_checkoption()
282                              luaL_checkstring(L, narg);  in luaL_checkoption()
287   return luaL_argerror(L, narg,  in luaL_checkoption()
304 LUALIB_API void luaL_checktype (lua_State *L, int narg, int t) {  in luaL_checktype()  argument
305   if (lua_type(L, narg) != t)  in luaL_checktype()
306     tag_error(L, narg, t);  in luaL_checktype()
310 LUALIB_API void luaL_checkany (lua_State *L, int narg) {  in luaL_checkany()  argument
311   if (lua_type(L, narg) == LUA_TNONE)  in luaL_checkany()
312     luaL_argerror(L, narg, "value expected");  in luaL_checkany()
316 LUALIB_API const char *luaL_checklstring (lua_State *L, int narg, size_t *len) {  in luaL_checklstring()  argument
317   const char *s = lua_tolstring(L, narg, len);  in luaL_checklstring()
318   if (!s) tag_error(L, narg, LUA_TSTRING);  in luaL_checklstring()
323 LUALIB_API const char *luaL_optlstring (lua_State *L, int narg,  in luaL_optlstring()  argument
325   if (lua_isnoneornil(L, narg)) {  in luaL_optlstring()
330   else return luaL_checklstring(L, narg, len);  in luaL_optlstring()
334 LUALIB_API lua_Number luaL_checknumber (lua_State *L, int narg) {  in luaL_checknumber()  argument
336   lua_Number d = lua_tonumberx(L, narg, &isnum);  in luaL_checknumber()
338     tag_error(L, narg, LUA_TNUMBER);  in luaL_checknumber()
343 LUALIB_API lua_Number luaL_optnumber (lua_State *L, int narg, lua_Number def) {  in luaL_optnumber()  argument
344   return luaL_opt(L, luaL_checknumber, narg, def);  in luaL_optnumber()
348 LUALIB_API lua_Integer luaL_checkinteger (lua_State *L, int narg) {  in luaL_checkinteger()  argument
350   lua_Integer d = lua_tointegerx(L, narg, &isnum);  in luaL_checkinteger()
352     tag_error(L, narg, LUA_TNUMBER);  in luaL_checkinteger()
357 LUALIB_API lua_Unsigned luaL_checkunsigned (lua_State *L, int narg) {  in luaL_checkunsigned()  argument
359   lua_Unsigned d = lua_tounsignedx(L, narg, &isnum);  in luaL_checkunsigned()
361     tag_error(L, narg, LUA_TNUMBER);  in luaL_checkunsigned()
366 LUALIB_API lua_Integer luaL_optinteger (lua_State *L, int narg,  in luaL_optinteger()  argument
368   return luaL_opt(L, luaL_checkinteger, narg, def);  in luaL_optinteger()
372 LUALIB_API lua_Unsigned luaL_optunsigned (lua_State *L, int narg,  in luaL_optunsigned()  argument
374   return luaL_opt(L, luaL_checkunsigned, narg, def);  in luaL_optunsigned()