(MAYBE_GC): Test gc_cons_threshold and gc_relative_threshold, one by one.
This commit is contained in:
@@ -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. */
|
||||
|
||||
Reference in New Issue
Block a user