diff options
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/alloc.c b/src/alloc.c index 8227feadae5..39833f8decb 100644 --- a/src/alloc.c +++ b/src/alloc.c | |||
| @@ -2542,6 +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 | /* Use a temporary signed variable, since otherwise INT_ADD_WRAPV | ||
| 2546 | might incorrectly return non-zero. */ | ||
| 2545 | int incr = sizeof *ptr; | 2547 | int incr = sizeof *ptr; |
| 2546 | if (INT_ADD_WRAPV (consing_until_gc, incr, &consing_until_gc)) | 2548 | if (INT_ADD_WRAPV (consing_until_gc, incr, &consing_until_gc)) |
| 2547 | consing_until_gc = OBJECT_CT_MAX; | 2549 | consing_until_gc = OBJECT_CT_MAX; |