Commit 0172a8f1 by Richard Henderson

ggc-simple.c (ggc_pop_context): Fold outstanding bytes into surrounding context.

        * ggc-simple.c (ggc_pop_context): Fold outstanding bytes into
        surrounding context.

From-SVN: r29353
parent f4e16489
...@@ -201,6 +201,8 @@ ggc_pop_context PROTO ((void)) ...@@ -201,6 +201,8 @@ ggc_pop_context PROTO ((void))
gs->next->strings = gs->strings; gs->next->strings = gs->strings;
} }
gs->next->bytes_alloced_since_gc += gs->bytes_alloced_since_gc;
ggc_chain = gs->next; ggc_chain = gs->next;
free (gs); free (gs);
} }
...@@ -489,9 +491,9 @@ ggc_collect () ...@@ -489,9 +491,9 @@ ggc_collect ()
struct ggc_any *a, **ap; struct ggc_any *a, **ap;
int time, n_rtxs, n_trees, n_vecs, n_strings, n_anys; int time, n_rtxs, n_trees, n_vecs, n_strings, n_anys;
#ifndef ENABLE_CHECKING #if !defined(ENABLE_CHECKING)
/* See if it's even worth our while. */ /* See if it's even worth our while. */
if (ggc_chain->bytes_alloced_since_gc < 64*1024) if (ggc_chain->bytes_alloced_since_gc < 4*1024*1024)
return; return;
#endif #endif
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment