瀏覽代碼

expressions too complex for an ARM compiler...

Roberto Ierusalimschy 22 年之前
父節點
當前提交
c4f9c887fc
共有 1 個文件被更改,包括 8 次插入5 次删除
  1. 8 5
      ldebug.c

+ 8 - 5
ldebug.c

@@ -1,5 +1,5 @@
 /*
-** $Id: ldebug.c,v 1.143 2002/12/11 12:34:22 roberto Exp roberto $
+** $Id: ldebug.c,v 1.144 2003/02/11 10:46:24 roberto Exp roberto $
 ** Debug Interface
 ** See Copyright Notice in lua.h
 */
@@ -451,8 +451,9 @@ static const char *getobjname (CallInfo *ci, int stackpos, const char **name) {
     lua_assert(pc != -1);
     switch (GET_OPCODE(i)) {
       case OP_GETGLOBAL: {
-        lua_assert(ttisstring(&p->k[GETARG_Bx(i)]));
-        *name = svalue(&p->k[GETARG_Bx(i)]);
+        int g = GETARG_Bx(i);  /* global index */
+        lua_assert(ttisstring(&p->k[g]));
+        *name = svalue(&p->k[g]);
         return "global";
       }
       case OP_MOVE: {
@@ -463,11 +464,13 @@ static const char *getobjname (CallInfo *ci, int stackpos, const char **name) {
         break;
       }
       case OP_GETTABLE: {
-        *name = kname(p, GETARG_C(i));
+        int k = GETARG_C(i);  /* key index */
+        *name = kname(p, k);
         return "field";
       }
       case OP_SELF: {
-        *name = kname(p, GETARG_C(i));
+        int k = GETARG_C(i);  /* key index */
+        *name = kname(p, k);
         return "method";
       }
       default: break;