client/deps/liblua/ldebug.h

   1 /*
   2 ** $Id: ldebug.h $
   3 ** Auxiliary functions from Debug Interface module
   4 ** See Copyright Notice in lua.h
   5 */
   6
   7 #ifndef ldebug_h
   8 #define ldebug_h
   9
  10
  11 #include "lstate.h"
  12
  13
  14 #define pcRel(pc, p)    (cast_int((pc) - (p)->code) - 1)
  15
  16
  17 /* Active Lua function (given call info) */
  18 #define ci_func(ci)             (clLvalue(s2v((ci)->func.p)))
  19
  20
  21 #define resethookcount(L)       (L->hookcount = L->basehookcount)
  22
  23 /*
  24 ** mark for entries in 'lineinfo' array that has absolute information in
  25 ** 'abslineinfo' array
  26 */
  27 #define ABSLINEINFO     (-0x80)
  28
  29
  30 /*
  31 ** MAXimum number of successive Instructions WiTHout ABSolute line
  32 ** information. (A power of two allows fast divisions.)
  33 */
  34 #if !defined(MAXIWTHABS)
  35 #define MAXIWTHABS      128
  36 #endif
  37
  38
  39 LUAI_FUNC int luaG_getfuncline(const Proto *f, int pc);
  40 LUAI_FUNC const char *luaG_findlocal(lua_State *L, CallInfo *ci, int n,
  41                                      StkId *pos);
  42 LUAI_FUNC l_noret luaG_typeerror(lua_State *L, const TValue *o,
  43                                  const char *opname);
  44 LUAI_FUNC l_noret luaG_callerror(lua_State *L, const TValue *o);
  45 LUAI_FUNC l_noret luaG_forerror(lua_State *L, const TValue *o,
  46                                 const char *what);
  47 LUAI_FUNC l_noret luaG_concaterror(lua_State *L, const TValue *p1,
  48                                    const TValue *p2);
  49 LUAI_FUNC l_noret luaG_opinterror(lua_State *L, const TValue *p1,
  50                                   const TValue *p2,
  51                                   const char *msg);
  52 LUAI_FUNC l_noret luaG_tointerror(lua_State *L, const TValue *p1,
  53                                   const TValue *p2);
  54 LUAI_FUNC l_noret luaG_ordererror(lua_State *L, const TValue *p1,
  55                                   const TValue *p2);
  56 LUAI_FUNC l_noret luaG_runerror(lua_State *L, const char *fmt, ...);
  57 LUAI_FUNC const char *luaG_addinfo(lua_State *L, const char *msg,
  58                                    TString *src, int line);
  59 LUAI_FUNC l_noret luaG_errormsg(lua_State *L);
  60 LUAI_FUNC int luaG_traceexec(lua_State *L, const Instruction *pc);
  61 LUAI_FUNC int luaG_tracecall(lua_State *L);
  62
  63
  64 #endif