From 100bfec39a3de3029a97e645e7fe33877d7bbc2f Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Thu, 31 Aug 2000 11:08:27 -0300 Subject: new implementation for `next' --- lparser.c | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) (limited to 'lparser.c') diff --git a/lparser.c b/lparser.c index 673302df..5c8efeaa 100644 --- a/lparser.c +++ b/lparser.c @@ -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); } -- cgit v1.2.3-55-g6feb