| 3034 | "end\n"; |
| 3035 | |
| 3036 | COMPAT53_API void lua_arith(lua_State* L, int op) { |
| 3037 | if (op < LUA_OPADD || op > LUA_OPUNM) |
| 3038 | luaL_error(L, "invalid 'op' argument for lua_arith"); |
| 3039 | luaL_checkstack(L, 5, "not enough stack slots"); |
| 3040 | if (op == LUA_OPUNM) |
| 3041 | lua_pushvalue(L, -1); |
| 3042 | lua_pushnumber(L, op); |
| 3043 | lua_insert(L, -3); |
| 3044 | compat53_call_lua(L, compat53_arith_code, sizeof(compat53_arith_code) - 1, 3, 1); |
| 3045 | } |
| 3046 | |
| 3047 | static const char compat53_compare_code[] |
| 3048 | = "local a,b=...\n" |
nothing calls this directly
no test coverage detected