1*dfc11533SChris Williamson /* 2*dfc11533SChris Williamson ** $Id: ldebug.h,v 2.7.1.1 2013/04/12 18:48:47 roberto Exp $ 3*dfc11533SChris Williamson ** Auxiliary functions from Debug Interface module 4*dfc11533SChris Williamson ** See Copyright Notice in lua.h 5*dfc11533SChris Williamson */ 6*dfc11533SChris Williamson 7*dfc11533SChris Williamson #ifndef ldebug_h 8*dfc11533SChris Williamson #define ldebug_h 9*dfc11533SChris Williamson 10*dfc11533SChris Williamson 11*dfc11533SChris Williamson #include "lstate.h" 12*dfc11533SChris Williamson 13*dfc11533SChris Williamson 14*dfc11533SChris Williamson #define pcRel(pc, p) (cast(int, (pc) - (p)->code) - 1) 15*dfc11533SChris Williamson 16*dfc11533SChris Williamson #define getfuncline(f,pc) (((f)->lineinfo) ? (f)->lineinfo[pc] : 0) 17*dfc11533SChris Williamson 18*dfc11533SChris Williamson #define resethookcount(L) (L->hookcount = L->basehookcount) 19*dfc11533SChris Williamson 20*dfc11533SChris Williamson /* Active Lua function (given call info) */ 21*dfc11533SChris Williamson #define ci_func(ci) (clLvalue((ci)->func)) 22*dfc11533SChris Williamson 23*dfc11533SChris Williamson 24*dfc11533SChris Williamson LUAI_FUNC l_noret luaG_typeerror (lua_State *L, const TValue *o, 25*dfc11533SChris Williamson const char *opname); 26*dfc11533SChris Williamson LUAI_FUNC l_noret luaG_concaterror (lua_State *L, StkId p1, StkId p2); 27*dfc11533SChris Williamson LUAI_FUNC l_noret luaG_aritherror (lua_State *L, const TValue *p1, 28*dfc11533SChris Williamson const TValue *p2); 29*dfc11533SChris Williamson LUAI_FUNC l_noret luaG_ordererror (lua_State *L, const TValue *p1, 30*dfc11533SChris Williamson const TValue *p2); 31*dfc11533SChris Williamson LUAI_FUNC l_noret luaG_runerror (lua_State *L, const char *fmt, ...); 32*dfc11533SChris Williamson LUAI_FUNC l_noret luaG_errormsg (lua_State *L); 33*dfc11533SChris Williamson 34*dfc11533SChris Williamson #endif 35