diff options
| author | Miles Bader <miles@gnu.org> | 2005-07-29 01:54:54 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2005-07-29 01:54:54 +0000 |
| commit | 58b646fafc27ea5fb93fa95d5ff84187d689d315 (patch) | |
| tree | 361704f8149dccf6d1578bea3b89da11ced846f7 /src/bytecode.c | |
| parent | ffc3bd5c6c5ce65d4390c3523e4527c701a0ed95 (diff) | |
| parent | d44e3b453c528446579182d82284abbfd80f8b7d (diff) | |
| download | emacs-58b646fafc27ea5fb93fa95d5ff84187d689d315.tar.gz emacs-58b646fafc27ea5fb93fa95d5ff84187d689d315.tar.bz2 emacs-58b646fafc27ea5fb93fa95d5ff84187d689d315.zip | |
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-74
Merge from emacs--cvs-trunk--0
Patches applied:
* emacs--cvs-trunk--0 (patch 493-503)
- Update from CVS
- Update from CVS: lisp/startup.el (command-line): Fix typo.
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 95-98)
- Update from CVS
Diffstat (limited to 'src/bytecode.c')
| -rw-r--r-- | src/bytecode.c | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/src/bytecode.c b/src/bytecode.c index 580fdc67119..c9ab56b18d1 100644 --- a/src/bytecode.c +++ b/src/bytecode.c @@ -355,13 +355,14 @@ unmark_byte_stack () /* 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. */ |