diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2019-07-22 18:05:31 -0700 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2019-07-22 18:06:11 -0700 |
commit | c34496d0b956abc9d1ad55daa53ba626138233f4 (patch) | |
tree | e3ae725b0e8fd6049c17724af6175b615ac49aca /src | |
parent | f9443e2a83e2bd09fd82c1bd3688990346a03d35 (diff) | |
download | emacs-c34496d0b956abc9d1ad55daa53ba626138233f4.tar.gz |
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
Diffstat (limited to 'src')
-rw-r--r-- | src/alloc.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/alloc.c b/src/alloc.c index aa9200f2ebb..5d8003ffb5c 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--; } |