diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2003-02-19 07:28:58 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2003-02-19 07:28:58 -0300 |
commit | c4f9c887fc8dc514b9de30ce395517caad973246 (patch) | |
tree | dfcc98d9825c9d3a013ea88c1bbce679afd777a1 | |
parent | 9866fb0ef1bd40afe47dd2cffdea5e66f9c048c1 (diff) | |
download | lua-c4f9c887fc8dc514b9de30ce395517caad973246.tar.gz lua-c4f9c887fc8dc514b9de30ce395517caad973246.tar.bz2 lua-c4f9c887fc8dc514b9de30ce395517caad973246.zip |
expressions too complex for an ARM compiler...
-rw-r--r-- | ldebug.c | 13 |
1 files changed, 8 insertions, 5 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ldebug.c,v 1.143 2002/12/11 12:34:22 roberto Exp roberto $ | 2 | ** $Id: ldebug.c,v 1.144 2003/02/11 10:46:24 roberto Exp roberto $ |
3 | ** Debug Interface | 3 | ** Debug Interface |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -451,8 +451,9 @@ static const char *getobjname (CallInfo *ci, int stackpos, const char **name) { | |||
451 | lua_assert(pc != -1); | 451 | lua_assert(pc != -1); |
452 | switch (GET_OPCODE(i)) { | 452 | switch (GET_OPCODE(i)) { |
453 | case OP_GETGLOBAL: { | 453 | case OP_GETGLOBAL: { |
454 | lua_assert(ttisstring(&p->k[GETARG_Bx(i)])); | 454 | int g = GETARG_Bx(i); /* global index */ |
455 | *name = svalue(&p->k[GETARG_Bx(i)]); | 455 | lua_assert(ttisstring(&p->k[g])); |
456 | *name = svalue(&p->k[g]); | ||
456 | return "global"; | 457 | return "global"; |
457 | } | 458 | } |
458 | case OP_MOVE: { | 459 | case OP_MOVE: { |
@@ -463,11 +464,13 @@ static const char *getobjname (CallInfo *ci, int stackpos, const char **name) { | |||
463 | break; | 464 | break; |
464 | } | 465 | } |
465 | case OP_GETTABLE: { | 466 | case OP_GETTABLE: { |
466 | *name = kname(p, GETARG_C(i)); | 467 | int k = GETARG_C(i); /* key index */ |
468 | *name = kname(p, k); | ||
467 | return "field"; | 469 | return "field"; |
468 | } | 470 | } |
469 | case OP_SELF: { | 471 | case OP_SELF: { |
470 | *name = kname(p, GETARG_C(i)); | 472 | int k = GETARG_C(i); /* key index */ |
473 | *name = kname(p, k); | ||
471 | return "method"; | 474 | return "method"; |
472 | } | 475 | } |
473 | default: break; | 476 | default: break; |