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

bug: C functions also may have stacks larger than current top

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2003-07-07 10:32:19 -03:00
parent 17f695157c
commit 9e05503ffa
1 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lgc.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lgc.c,v 1.172 2003/04/28 19:26:16 roberto Exp roberto $ ** $Id: lgc.c,v 1.173 2003/05/16 18:58:39 roberto Exp roberto $
** Garbage Collector ** Garbage Collector
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -233,8 +233,7 @@ static void traversestack (GCState *st, lua_State *L1) {
for (ci = L1->base_ci; ci <= L1->ci; ci++) { for (ci = L1->base_ci; ci <= L1->ci; ci++) {
lua_assert(ci->top <= L1->stack_last); lua_assert(ci->top <= L1->stack_last);
lua_assert(ci->state & (CI_C | CI_HASFRAME | CI_SAVEDPC)); lua_assert(ci->state & (CI_C | CI_HASFRAME | CI_SAVEDPC));
if (!(ci->state & CI_C) && lim < ci->top) if (lim < ci->top) lim = ci->top;
lim = ci->top;
} }
for (o = L1->stack; o < L1->top; o++) for (o = L1->stack; o < L1->top; o++)
markobject(st, o); markobject(st, o);