aboutsummaryrefslogtreecommitdiffstats
path: root/src/alloc.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/alloc.c')
-rw-r--r--src/alloc.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/alloc.c b/src/alloc.c
index 5e089311a27..d9022ac46c3 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -2542,7 +2542,9 @@ 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 (INT_ADD_WRAPV (consing_until_gc, sizeof *ptr, &consing_until_gc)) 2545 if (consing_until_gc <= 0)
2546 consing_until_gc += sizeof *ptr;
2547 else if (INT_ADD_WRAPV (consing_until_gc, sizeof *ptr, &consing_until_gc))
2546 consing_until_gc = OBJECT_CT_MAX; 2548 consing_until_gc = OBJECT_CT_MAX;
2547 gcstat.total_free_conses++; 2549 gcstat.total_free_conses++;
2548} 2550}