From 617be660158490c7f6558e82d9be2c667c48d9a4 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Mon, 6 Dec 1999 10:03:45 -0200
Subject: better control (and error recovery) for begin/end blocks

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

(limited to 'lstate.c')

diff --git a/lstate.c b/lstate.c
index 3306c780..04e7d419 100644
--- a/lstate.c
+++ b/lstate.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lstate.c,v 1.19 1999/12/01 19:50:08 roberto Exp roberto $
+** $Id: lstate.c,v 1.20 1999/12/06 11:41:28 roberto Exp roberto $
 ** Global State
 ** See Copyright Notice in lua.h
 */
@@ -99,6 +99,7 @@ void lua_close (lua_State *L) {
   luaM_free(L, L->refArray);
   luaM_free(L, L->Mbuffer);
   luaM_free(L, L->Cblocks);
+  LUA_ASSERT(L, L->numCblocks == 0, "Cblocks still open");
   LUA_ASSERT(L, L->nblocks == 0, "wrong count for nblocks");
   LUA_ASSERT(L, L != lua_state || L->Cstack.lua2C == L->stack, "bad stack");
   LUA_ASSERT(L, L != lua_state || L->Cstack.base == L->stack, "bad stack");
-- 
cgit v1.2.3-55-g6feb