|
|
@@ -558,6 +558,10 @@ LUALIB_API char *luaL_prepbuffsize (luaL_Buffer *B, size_t sz) {
|
|
|
|
|
|
LUALIB_API void luaL_addlstring (luaL_Buffer *B, const char *s, size_t l) {
|
|
|
if (l > 0) { /* avoid 'memcpy' when 's' can be NULL */
|
|
|
+ if(l>100)
|
|
|
+ {
|
|
|
+ lua_gc(L, LUA_GCCOLLECT, 0);
|
|
|
+ }
|
|
|
char *b = luaL_prepbuffsize(B, l);
|
|
|
memcpy(b, s, l * sizeof(char));
|
|
|
luaL_addsize(B, l);
|