diff options
Diffstat (limited to 'lparser.c')
| -rw-r--r-- | lparser.c | 6 |
1 files changed, 3 insertions, 3 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lparser.c,v 2.112 2011/06/27 18:18:59 roberto Exp roberto $ | 2 | ** $Id: lparser.c,v 2.113 2011/07/02 15:58:14 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 | */ |
| @@ -418,7 +418,7 @@ static void movegotosout (FuncState *fs, BlockCnt *bl) { | |||
| 418 | int i = bl->firstgoto; | 418 | int i = bl->firstgoto; |
| 419 | Labellist *gl = &fs->ls->dyd->gt; | 419 | Labellist *gl = &fs->ls->dyd->gt; |
| 420 | /* correct pending gotos to current block and try to close it | 420 | /* correct pending gotos to current block and try to close it |
| 421 | with visible labels */ | 421 | with visible labels */ |
| 422 | while (i < gl->n) { | 422 | while (i < gl->n) { |
| 423 | Labeldesc *gt = &gl->arr[i]; | 423 | Labeldesc *gt = &gl->arr[i]; |
| 424 | if (gt->nactvar > bl->nactvar) { | 424 | if (gt->nactvar > bl->nactvar) { |
| @@ -1190,7 +1190,7 @@ static void checkrepeated (FuncState *fs, Labellist *ll, TString *label) { | |||
| 1190 | int i; | 1190 | int i; |
| 1191 | for (i = fs->bl->firstlabel; i < ll->n; i++) { | 1191 | for (i = fs->bl->firstlabel; i < ll->n; i++) { |
| 1192 | if (eqstr(label, ll->arr[i].name)) { | 1192 | if (eqstr(label, ll->arr[i].name)) { |
| 1193 | const char *msg = luaO_pushfstring(fs->ls->L, | 1193 | const char *msg = luaO_pushfstring(fs->ls->L, |
| 1194 | "label " LUA_QS " already defined on line %d", | 1194 | "label " LUA_QS " already defined on line %d", |
| 1195 | getstr(label), ll->arr[i].line); | 1195 | getstr(label), ll->arr[i].line); |
| 1196 | semerror(fs->ls, msg); | 1196 | semerror(fs->ls, msg); |