Changeset e93b5f6d083f4d5fe2b7fec643db5b85a80ed1a7 for src/lua
- Timestamp:
- 07/28/11 16:31:20 (2 years ago)
- git-parent:
- Files:
-
- src/lua/src/ldebug.c (modified) (1 diff)
- src/lua/src/ldebug.h (modified) (1 diff)
- src/lua/src/lvm.c (modified) (1 diff)
- src/lua/src/print.c (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
src/lua/src/ldebug.c
r22d1941 re93b5f6 47 47 return -1; /* only active lua functions have current-line information */ 48 48 else 49 return getline(ci_func(ci)->l.p, pc);49 return lua__getline(ci_func(ci)->l.p, pc); 50 50 } 51 51 src/lua/src/ldebug.h
r22d1941 re93b5f6 14 14 #define pcRel(pc, p) (cast(int, (pc) - (p)->code) - 1) 15 15 16 #define getline(f,pc) (((f)->lineinfo) ? (f)->lineinfo[pc] : 0)16 #define lua__getline(f,pc) (((f)->lineinfo) ? (f)->lineinfo[pc] : 0) 17 17 18 18 #define resethookcount(L) (L->hookcount = L->basehookcount) src/lua/src/lvm.c
r22d1941 re93b5f6 69 69 Proto *p = ci_func(L->ci)->l.p; 70 70 int npc = pcRel(pc, p); 71 int newline = getline(p, npc);71 int newline = lua__getline(p, npc); 72 72 /* call linehook when enter a new function, when jump back (loop), 73 73 or when enter a new line */ 74 if (npc == 0 || pc <= oldpc || newline != getline(p, pcRel(oldpc, p)))74 if (npc == 0 || pc <= oldpc || newline != lua__getline(p, pcRel(oldpc, p))) 75 75 luaD_callhook(L, LUA_HOOKLINE, newline); 76 76 } src/lua/src/print.c
r22d1941 re93b5f6 85 85 int bx=GETARG_Bx(i); 86 86 int sbx=GETARG_sBx(i); 87 int line= getline(f,pc);87 int line=lua__getline(f,pc); 88 88 printf("\t%d\t",pc+1); 89 89 if (line>0) printf("[%d]\t",line); else printf("[-]\t");
