nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

new implementation for `next'

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2000-08-31 11:08:27 -03:00
parent a290b84c67
commit 100bfec39a
9 changed files with 76 additions and 75 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
lparser.c
View File

@@ -1,5 +1,5 @@
/*
** $Id: lparser.c,v 1.109 2000/08/15 13:18:28 roberto Exp roberto $
** $Id: lparser.c,v 1.110 2000/08/22 17:44:17 roberto Exp roberto $
** LL(1) Parser and code generator for Lua
** See Copyright Notice in lua.h
*/
@@ -877,10 +877,9 @@ static void forlist (LexState *ls, TString *indexname) {
next(ls); /* skip `in' */
exp1(ls); /* table */
new_localvarstr(ls, "*table*", 0);
new_localvarstr(ls, "*counter*", 1);
new_localvar(ls, indexname, 2);
new_localvar(ls, valname, 3);
forbody(ls, 4, OP_LFORPREP, OP_LFORLOOP);
new_localvar(ls, indexname, 1);
new_localvar(ls, valname, 2);
forbody(ls, 3, OP_LFORPREP, OP_LFORLOOP);
}