Mercurial > emacs
comparison src/bytecode.c @ 64268:64b32564144f
(MAYBE_GC): Use gc_cons_combined_threshold.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 13 Jul 2005 05:29:10 +0000 |
| parents | a8fa7c632ee4 |
| children | c94082ceb41d fbb2bea03df9 |
comparison
equal
deleted
inserted
replaced
| 64267:5c7cbbd6dbb4 | 64268:64b32564144f |
|---|---|
| 353 #define AFTER_POTENTIAL_GC() stack.top = NULL | 353 #define AFTER_POTENTIAL_GC() stack.top = NULL |
| 354 | 354 |
| 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_threshold) \ | 359 if (consing_since_gc > gc_cons_combined_threshold) \ |
| 360 { \ | 360 { \ |
| 361 BEFORE_POTENTIAL_GC (); \ | 361 BEFORE_POTENTIAL_GC (); \ |
| 362 Fgarbage_collect (); \ | 362 Fgarbage_collect (); \ |
| 363 AFTER_POTENTIAL_GC (); \ | 363 AFTER_POTENTIAL_GC (); \ |
| 364 } \ | 364 } \ |
| 365 else | 365 else |
| 366 | 366 |
| 367 /* Check for jumping out of range. */ | 367 /* Check for jumping out of range. */ |
| 368 | 368 |
| 369 #ifdef BYTE_CODE_SAFE | 369 #ifdef BYTE_CODE_SAFE |