diff options
Diffstat (limited to 'lmem.c')
-rw-r--r-- | lmem.c | 8 |
1 files changed, 3 insertions, 5 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lmem.c,v 1.83 2011/11/30 12:42:49 roberto Exp roberto $ | 2 | ** $Id: lmem.c,v 1.84 2012/05/23 15:41:53 roberto Exp roberto $ |
3 | ** Interface to Memory Manager | 3 | ** Interface to Memory Manager |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -85,10 +85,8 @@ void *luaM_realloc_ (lua_State *L, void *block, size_t osize, size_t nsize) { | |||
85 | if (newblock == NULL && nsize > 0) { | 85 | if (newblock == NULL && nsize > 0) { |
86 | api_check(L, nsize > realosize, | 86 | api_check(L, nsize > realosize, |
87 | "realloc cannot fail when shrinking a block"); | 87 | "realloc cannot fail when shrinking a block"); |
88 | if (g->gcrunning) { | 88 | luaC_fullgc(L, 1); /* try to free some memory... */ |
89 | luaC_fullgc(L, 1); /* try to free some memory... */ | 89 | newblock = (*g->frealloc)(g->ud, block, osize, nsize); /* try again */ |
90 | newblock = (*g->frealloc)(g->ud, block, osize, nsize); /* try again */ | ||
91 | } | ||
92 | if (newblock == NULL) | 90 | if (newblock == NULL) |
93 | luaD_throw(L, LUA_ERRMEM); | 91 | luaD_throw(L, LUA_ERRMEM); |
94 | } | 92 | } |