1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
#ifndef _ERROR_H_
#define _ERROR_H_
#include "luaT.h"
#include <string.h>
static inline int _lua_error(lua_State *L, int ret, const char* file, int line) {
int pos_ret = ret >= 0 ? ret : -ret;
return luaL_error(L, "ERROR: (%s, %d): (%d, %s)\n", file, line, pos_ret, strerror(pos_ret));
}
static inline int _lua_error_str(lua_State *L, const char *str, const char* file, int line) {
return luaL_error(L, "ERROR: (%s, %d): (%s)\n", file, line, str);
}
static inline int _lua_error_str_str(lua_State *L, const char *str, const char* file, int line, const char *extra) {
return luaL_error(L, "ERROR: (%s, %d): (%s: %s)\n", file, line, str, extra);
}
#define LUA_HANDLE_ERROR(L, ret) _lua_error(L, ret, __FILE__, __LINE__)
#define LUA_HANDLE_ERROR_STR(L, str) _lua_error_str(L, str, __FILE__, __LINE__)
#define LUA_HANDLE_ERROR_STR_STR(L, str, extra) _lua_error_str_str(L, str, __FILE__, __LINE__, extra)
#endif
|
