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