diff options
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/alloc.c b/src/alloc.c index d9022ac46c3..8227feadae5 100644 --- a/src/alloc.c +++ b/src/alloc.c | |||
| @@ -2542,9 +2542,8 @@ free_cons (struct Lisp_Cons *ptr) | |||
| 2542 | ptr->u.s.u.chain = cons_free_list; | 2542 | ptr->u.s.u.chain = cons_free_list; |
| 2543 | ptr->u.s.car = dead_object (); | 2543 | ptr->u.s.car = dead_object (); |
| 2544 | cons_free_list = ptr; | 2544 | cons_free_list = ptr; |
| 2545 | if (consing_until_gc <= 0) | 2545 | int incr = sizeof *ptr; |
| 2546 | consing_until_gc += sizeof *ptr; | 2546 | if (INT_ADD_WRAPV (consing_until_gc, incr, &consing_until_gc)) |
| 2547 | else if (INT_ADD_WRAPV (consing_until_gc, sizeof *ptr, &consing_until_gc)) | ||
| 2548 | consing_until_gc = OBJECT_CT_MAX; | 2547 | consing_until_gc = OBJECT_CT_MAX; |
| 2549 | gcstat.total_free_conses++; | 2548 | gcstat.total_free_conses++; |
| 2550 | } | 2549 | } |