aboutsummaryrefslogtreecommitdiff
path: root/lmem.c
diff options
context:
space:
mode:
Diffstat (limited to 'lmem.c')
-rw-r--r--lmem.c8
1 files changed, 5 insertions, 3 deletions
diff --git a/lmem.c b/lmem.c
index 82f7f3ea..dacaef29 100644
--- a/lmem.c
+++ b/lmem.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lmem.c,v 1.88 2014/11/02 19:19:04 roberto Exp roberto $ 2** $Id: lmem.c,v 1.89 2014/11/02 19:33:33 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*/
@@ -87,8 +87,10 @@ void *luaM_realloc_ (lua_State *L, void *block, size_t osize, size_t nsize) {
87 if (newblock == NULL && nsize > 0) { 87 if (newblock == NULL && nsize > 0) {
88 api_check( nsize > realosize, 88 api_check( nsize > realosize,
89 "realloc cannot fail when shrinking a block"); 89 "realloc cannot fail when shrinking a block");
90 luaC_fullgc(L, 1); /* try to free some memory... */ 90 if (g->version) { /* is state fully built? */
91 newblock = (*g->frealloc)(g->ud, block, osize, nsize); /* try again */ 91 luaC_fullgc(L, 1); /* try to free some memory... */
92 newblock = (*g->frealloc)(g->ud, block, osize, nsize); /* try again */
93 }
92 if (newblock == NULL) 94 if (newblock == NULL)
93 luaD_throw(L, LUA_ERRMEM); 95 luaD_throw(L, LUA_ERRMEM);
94 } 96 }