| 63 | |
| 64 | |
| 65 | static int report (lua_State *L, int status) { |
| 66 | if (status && !lua_isnil(L, -1)) { |
| 67 | const char *msg = lua_tostring(L, -1); |
| 68 | if (msg == NULL) msg = "(error object is not a string)"; |
| 69 | l_message(progname, msg); |
| 70 | lua_pop(L, 1); |
| 71 | } |
| 72 | return status; |
| 73 | } |
| 74 | |
| 75 | |
| 76 | static int traceback (lua_State *L) { |