From e5919be1a7a76bc782a66ac19ff1367ede11f4b9 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Tue, 2 Apr 2002 17:34:15 -0300
Subject: [PATCH] bug: end of block may not be end of stat

---
 lparser.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lparser.c b/lparser.c
index d3b12da9..6b0234f5 100644
--- a/lparser.c
+++ b/lparser.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lparser.c,v 1.172 2002/03/21 20:32:22 roberto Exp roberto $
+** $Id: lparser.c,v 1.173 2002/03/25 17:47:14 roberto Exp roberto $
 ** Lua Parser
 ** See Copyright Notice in lua.h
 */
@@ -342,6 +342,7 @@ static void leaveblock (FuncState *fs) {
     luaK_codeABC(fs, OP_CLOSE, bl->nactloc, 0, 0);
   lua_assert(bl->nactloc == fs->nactloc);
   lua_assert(bl->nactvar == fs->nactvar);
+  fs->freereg = fs->nactloc;  /* free registers */
   fs->defaultglob = bl->defaultglob;
   luaK_patchtohere(fs, bl->breaklist);
 }