[Emacs-diffs] master c34496d: Keep track of consing while GC’s inhibited

[Paul Eggert]

branch: master
commit c34496d0b956abc9d1ad55daa53ba626138233f4
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>

    Keep track of consing while GC’s inhibited
    
    * src/alloc.c (allow_garbage_collection): Do not discard the count
    of consing that occurred while GC was inhibited.
    Problem and initial fix reported by Pip Cet in:
    https://lists.gnu.org/r/emacs-devel/2019-07/msg00523.html
---
 src/alloc.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/alloc.c b/src/alloc.c
index aa9200f..5d8003f 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -5507,7 +5507,7 @@ staticpro (Lisp_Object const *varaddress)
 static void
 allow_garbage_collection (intmax_t consing)
 {
-  consing_until_gc = consing;
+  consing_until_gc -= OBJECT_CT_MAX - consing;
   garbage_collection_inhibited--;
 }