/* Check whether 'status' is not OK and, if so, prints the error message on the top of the stack. It assumes that the error object is a string, as it was either generated by Lua or by 'msghandler'.  */
static int report(lua_State *L, int status)
/* Check whether 'status' is not OK and, if so, prints the error message on the top of the stack. It assumes that the error object is a string, as it was either generated by Lua or by 'msghandler'.  */
static int report(lua_State *L, int status)
{
		const char *msg = lua_tostring(L, -1);
		l_message(progname, msg);
		lua_pop(L, 1);
	}
	return status;
}