| 261 | #else /* }{ */ |
| 262 | |
| 263 | static int tonum (lua_State *L, int arg) { |
| 264 | if (lua_type(L, arg) == LUA_TNUMBER) { /* already a number? */ |
| 265 | lua_pushvalue(L, arg); |
| 266 | return 1; |
| 267 | } |
| 268 | else { /* check whether it is a numerical string */ |
| 269 | size_t len; |
| 270 | const char *s = lua_tolstring(L, arg, &len); |
| 271 | return (s != NULL && lua_stringtonumber(L, s) == len + 1); |
| 272 | } |
| 273 | } |
| 274 | |
| 275 | |
| 276 | static void trymt (lua_State *L, const char *mtname) { |
no test coverage detected