Mercurial > emacs
changeset 64615:c94082ceb41d
(MAYBE_GC): Test gc_cons_threshold and gc_relative_threshold, one by one.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 23 Jul 2005 19:14:59 +0000 |
| parents | 482ea9d640ec |
| children | bd56ec807f9a |
| files | src/bytecode.c |
| diffstat | 1 files changed, 8 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/src/bytecode.c Sat Jul 23 19:09:50 2005 +0000 +++ b/src/bytecode.c Sat Jul 23 19:14:59 2005 +0000 @@ -355,13 +355,14 @@ /* Garbage collect if we have consed enough since the last time. We do this at every branch, to avoid loops that never GC. */ -#define MAYBE_GC() \ - if (consing_since_gc > gc_cons_combined_threshold) \ - { \ - BEFORE_POTENTIAL_GC (); \ - Fgarbage_collect (); \ - AFTER_POTENTIAL_GC (); \ - } \ +#define MAYBE_GC() \ + if (consing_since_gc > gc_cons_threshold \ + && consing_since_gc > gc_relative_threshold) \ + { \ + BEFORE_POTENTIAL_GC (); \ + Fgarbage_collect (); \ + AFTER_POTENTIAL_GC (); \ + } \ else /* Check for jumping out of range. */