diff options
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 () | |||
| 355 | /* Garbage collect if we have consed enough since the last time. | 355 | /* Garbage collect if we have consed enough since the last time. |
| 356 | We do this at every branch, to avoid loops that never GC. */ | 356 | We do this at every branch, to avoid loops that never GC. */ |
| 357 | 357 | ||
| 358 | #define MAYBE_GC() \ | 358 | #define MAYBE_GC() \ |
| 359 | if (consing_since_gc > gc_cons_combined_threshold) \ | 359 | if (consing_since_gc > gc_cons_threshold \ |
| 360 | { \ | 360 | && consing_since_gc > gc_relative_threshold) \ |
| 361 | BEFORE_POTENTIAL_GC (); \ | 361 | { \ |
| 362 | Fgarbage_collect (); \ | 362 | BEFORE_POTENTIAL_GC (); \ |
| 363 | AFTER_POTENTIAL_GC (); \ | 363 | Fgarbage_collect (); \ |
| 364 | } \ | 364 | AFTER_POTENTIAL_GC (); \ |
| 365 | } \ | ||
| 365 | else | 366 | else |
| 366 | 367 | ||
| 367 | /* Check for jumping out of range. */ | 368 | /* Check for jumping out of range. */ |