diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-01-25 11:57:18 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-01-25 11:57:18 -0200 |
commit | d11e5adf55b11a446671775a6c7803e066fc94e8 (patch) | |
tree | b7881e03e792bcc46f497577e8141b5ecc2e5b17 /ldebug.c | |
parent | 99e340b2ba08226f4f7b457b170296af8d82959b (diff) | |
download | lua-d11e5adf55b11a446671775a6c7803e066fc94e8.tar.gz lua-d11e5adf55b11a446671775a6c7803e066fc94e8.tar.bz2 lua-d11e5adf55b11a446671775a6c7803e066fc94e8.zip |
`const' array in protos breaked in 3 arrays (for strings, numbers, and
prototypes).
Diffstat (limited to '')
-rw-r--r-- | ldebug.c | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ldebug.c,v 1.4 1999/12/30 18:28:40 roberto Exp roberto $ | 2 | ** $Id: ldebug.c,v 1.5 2000/01/19 12:00:45 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 | */ |
@@ -94,8 +94,7 @@ static const char *luaG_getname (lua_State *L, const char **name, StkId top) { | |||
94 | if (ttype(f) == LUA_T_LCLMARK) | 94 | if (ttype(f) == LUA_T_LCLMARK) |
95 | f = protovalue(f); | 95 | f = protovalue(f); |
96 | LUA_ASSERT(L, ttype(f) == LUA_T_LMARK, "must be a Lua function"); | 96 | LUA_ASSERT(L, ttype(f) == LUA_T_LMARK, "must be a Lua function"); |
97 | LUA_ASSERT(L, ttype(&tfvalue(f)->consts[i]) == LUA_T_STRING, ""); | 97 | *name = tfvalue(f)->strcnst[i]->str; |
98 | *name = tsvalue(&tfvalue(f)->consts[i])->str; | ||
99 | return luaO_typename(f+2); | 98 | return luaO_typename(f+2); |
100 | } | 99 | } |
101 | } | 100 | } |