GitHub/lua
1
0
Fork 0
mirror of https://github.com/lua/lua.git synced 2025-02-04 06:13:04 +08:00
Code Issues Projects Releases Wiki Activity

error in calls signalled in first line (instead of last)

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2002-04-10 16:14:45 -03:00
parent f1f271ae76
commit 11c63bc3af
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lparser.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: lparser.c,v 1.174 2002/04/02 20:34:15 roberto Exp roberto $ ** $Id: lparser.c,v 1.175 2002/04/09 19:47:44 roberto Exp roberto $
** Lua Parser ** Lua Parser
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -475,9 +475,9 @@ static void funcargs (LexState *ls, expdesc *f) {
FuncState *fs = ls->fs; FuncState *fs = ls->fs;
expdesc args; expdesc args;
int base, nparams; int base, nparams;
int line = ls->linenumber;
switch (ls->t.token) { switch (ls->t.token) {
case '(': { /* funcargs -> `(' [ explist1 ] `)' */ case '(': { /* funcargs -> `(' [ explist1 ] `)' */
int line = ls->linenumber;
if (line != ls->lastline) if (line != ls->lastline)
luaK_error(ls, "ambiguous syntax (function call x new statement)"); luaK_error(ls, "ambiguous syntax (function call x new statement)");
next(ls); next(ls);
@ -514,6 +514,7 @@ static void funcargs (LexState *ls, expdesc *f) {
nparams = fs->freereg - (base+1); nparams = fs->freereg - (base+1);
} }
init_exp(f, VCALL, luaK_codeABC(fs, OP_CALL, base, nparams+1, 2)); init_exp(f, VCALL, luaK_codeABC(fs, OP_CALL, base, nparams+1, 2));
fs->f->lineinfo[f->info] = line;
fs->freereg = base+1; /* call remove function and arguments and leaves fs->freereg = base+1; /* call remove function and arguments and leaves
(unless changed) one result */ (unless changed) one result */
} }