diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2001-06-15 17:36:57 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2001-06-15 17:36:57 -0300 |
commit | 8e586c13fcf3066886a7edd69011304eaad57a2b (patch) | |
tree | 417c2102ba8c4d693c49a2df839612d371eded50 /ldebug.c | |
parent | eadf2aaaffa7a35e7f67b150ce0d57f2c17b9231 (diff) | |
download | lua-8e586c13fcf3066886a7edd69011304eaad57a2b.tar.gz lua-8e586c13fcf3066886a7edd69011304eaad57a2b.tar.bz2 lua-8e586c13fcf3066886a7edd69011304eaad57a2b.zip |
cleaner way to ensure alignment for strings and userdata
Diffstat (limited to 'ldebug.c')
-rw-r--r-- | ldebug.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ldebug.c,v 1.81 2001/06/08 19:00:57 roberto Exp roberto $ | 2 | ** $Id: ldebug.c,v 1.82 2001/06/11 14:56:42 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 | */ |
@@ -483,7 +483,7 @@ static const l_char *getobjname (lua_State *L, StkId obj, const l_char **name) { | |||
483 | switch (GET_OPCODE(i)) { | 483 | switch (GET_OPCODE(i)) { |
484 | case OP_GETGLOBAL: { | 484 | case OP_GETGLOBAL: { |
485 | lua_assert(ttype(&p->k[GETARG_Bc(i)]) == LUA_TSTRING); | 485 | lua_assert(ttype(&p->k[GETARG_Bc(i)]) == LUA_TSTRING); |
486 | *name = getstr(tsvalue(&p->k[GETARG_Bc(i)])); | 486 | *name = svalue(&p->k[GETARG_Bc(i)]); |
487 | return l_s("global"); | 487 | return l_s("global"); |
488 | } | 488 | } |
489 | case OP_MOVE: { | 489 | case OP_MOVE: { |
@@ -497,7 +497,7 @@ static const l_char *getobjname (lua_State *L, StkId obj, const l_char **name) { | |||
497 | case OP_SELF: { | 497 | case OP_SELF: { |
498 | int c = GETARG_C(i) - MAXSTACK; | 498 | int c = GETARG_C(i) - MAXSTACK; |
499 | if (c >= 0 && ttype(&p->k[c]) == LUA_TSTRING) { | 499 | if (c >= 0 && ttype(&p->k[c]) == LUA_TSTRING) { |
500 | *name = getstr(tsvalue(&p->k[c])); | 500 | *name = svalue(&p->k[c]); |
501 | return l_s("field"); | 501 | return l_s("field"); |
502 | } | 502 | } |
503 | break; | 503 | break; |