| 218 | |
| 219 | |
| 220 | static int math_max (lua_State *L) { |
| 221 | int n = lua_gettop(L); /* number of arguments */ |
| 222 | int imax = 1; /* index of current maximum value */ |
| 223 | int i; |
| 224 | luaL_argcheck(L, n >= 1, 1, "value expected"); |
| 225 | for (i = 2; i <= n; i++) { |
| 226 | if (lua_compare(L, imax, i, LUA_OPLT)) |
| 227 | imax = i; |
| 228 | } |
| 229 | lua_pushvalue(L, imax); |
| 230 | return 1; |
| 231 | } |
| 232 | |
| 233 | |
| 234 | static int math_type (lua_State *L) { |
nothing calls this directly
no test coverage detected