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

small bug

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2005-06-28 10:01:31 -03:00
parent 2f0955b99b
commit 69cc0a12fe
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
ldebug.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: ldebug.c,v 2.22 2005/06/13 14:15:54 roberto Exp roberto $ ** $Id: ldebug.c,v 2.23 2005/06/13 14:39:19 roberto Exp roberto $
** Debug Interface ** Debug Interface
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -392,8 +392,8 @@ static Instruction symbexec (const Proto *pt, int lastpc, int reg) {
} }
case OP_TFORLOOP: { case OP_TFORLOOP: {
check(c >= 1); /* at least one result (control variable) */ check(c >= 1); /* at least one result (control variable) */
checkreg(pt, a+3+c); /* space for results */ checkreg(pt, a+2+c); /* space for results */
if (reg >= a+3) last = pc; /* affect all regs above its call base */ if (reg >= a+2) last = pc; /* affect all regs above its base */
break; break;
} }
case OP_FORLOOP: case OP_FORLOOP: