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

TFORLOOP makes a call that affects all values above it on the stack

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2002-12-06 15:15:35 -02:00
parent cc4a22ebe2
commit 9bd3fc1039
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
ldebug.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: ldebug.c,v 1.140 2002/11/26 08:59:48 roberto Exp roberto $ ** $Id: ldebug.c,v 1.141 2002/12/04 17:38:31 roberto Exp roberto $
** Debug Interface ** Debug Interface
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -365,6 +365,7 @@ static Instruction luaG_symbexec (const Proto *pt, int lastpc, int reg) {
} }
case OP_TFORLOOP: case OP_TFORLOOP:
checkreg(pt, a+2+c); checkreg(pt, a+2+c);
if (reg >= a) last = pc; /* affect all registers above base */
/* go through */ /* go through */
case OP_FORLOOP: case OP_FORLOOP:
checkreg(pt, a+2); checkreg(pt, a+2);