Browse Source

default PAUSE should be 200 (differences may be corrected in

internal multiplers)
+ check for unbilt stack equal the one used by lgc.c
pull/9/head
Roberto Ierusalimschy 15 years ago
parent
commit
0062db1e06
  1. 12
      lstate.c

12
lstate.c

@ -1,5 +1,5 @@
/* /*
** $Id: lstate.c,v 2.82 2010/04/19 17:40:13 roberto Exp roberto $ ** $Id: lstate.c,v 2.83 2010/04/29 17:35:10 roberto Exp roberto $
** Global State ** Global State
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -26,7 +26,7 @@
#if !defined(LUAI_GCPAUSE) #if !defined(LUAI_GCPAUSE)
#define LUAI_GCPAUSE 162 /* 162% */ #define LUAI_GCPAUSE 200 /* 200% */
#endif #endif
#if !defined(LUAI_GCMUL) #if !defined(LUAI_GCMUL)
@ -110,10 +110,10 @@ static void stack_init (lua_State *L1, lua_State *L) {
static void freestack (lua_State *L) { static void freestack (lua_State *L) {
if (L->ci != NULL) { /* is there a 'ci' list? */ if (L->stack == NULL)
L->ci = &L->base_ci; /* free the entire list */ return; /* stack not completely built yet */
luaE_freeCI(L); L->ci = &L->base_ci; /* free the entire 'ci' list */
} luaE_freeCI(L);
luaM_freearray(L, L->stack, L->stacksize); /* free stack array */ luaM_freearray(L, L->stack, L->stacksize); /* free stack array */
} }

Loading…
Cancel
Save