diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2011-10-31 15:46:04 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2011-10-31 15:46:04 -0200 |
commit | fd8a8496217186a4b948b02db91a9c8838168653 (patch) | |
tree | f09ede14e02be746526976faecf36bafcd9263b7 | |
parent | 5a568a3b01d4a816d6cb15a0c48ca6096c837ef1 (diff) | |
download | lua-fd8a8496217186a4b948b02db91a9c8838168653.tar.gz lua-fd8a8496217186a4b948b02db91a9c8838168653.tar.bz2 lua-fd8a8496217186a4b948b02db91a9c8838168653.zip |
detail (avoid applying macro 'getstr' with a function-call argument)
-rw-r--r-- | lparser.c | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lparser.c,v 2.120 2011/09/30 12:44:45 roberto Exp roberto $ | 2 | ** $Id: lparser.c,v 2.121 2011/10/24 14:51:44 roberto Exp roberto $ |
3 | ** Lua Parser | 3 | ** Lua Parser |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -344,9 +344,10 @@ static void closegoto (LexState *ls, int g, Labeldesc *label) { | |||
344 | Labeldesc *gt = &gl->arr[g]; | 344 | Labeldesc *gt = &gl->arr[g]; |
345 | lua_assert(eqstr(gt->name, label->name)); | 345 | lua_assert(eqstr(gt->name, label->name)); |
346 | if (gt->nactvar < label->nactvar) { | 346 | if (gt->nactvar < label->nactvar) { |
347 | TString *vname = getlocvar(fs, gt->nactvar)->varname; | ||
347 | const char *msg = luaO_pushfstring(ls->L, | 348 | const char *msg = luaO_pushfstring(ls->L, |
348 | "<goto %s> at line %d jumps into the scope of local " LUA_QS, | 349 | "<goto %s> at line %d jumps into the scope of local " LUA_QS, |
349 | getstr(gt->name), gt->line, getstr(getlocvar(fs, gt->nactvar)->varname)); | 350 | getstr(gt->name), gt->line, getstr(vname)); |
350 | semerror(ls, msg); | 351 | semerror(ls, msg); |
351 | } | 352 | } |
352 | luaK_patchlist(fs, gt->pc, label->pc); | 353 | luaK_patchlist(fs, gt->pc, label->pc); |