aboutsummaryrefslogtreecommitdiffstats
path: root/src/alloc.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/alloc.c')
-rw-r--r--src/alloc.c6
1 files changed, 4 insertions, 2 deletions
diff --git a/src/alloc.c b/src/alloc.c
index 350fec25a02..0ed5b9346f6 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -6122,11 +6122,13 @@ garbage_collect (void)
6122 6122
6123 gc_in_progress = 0; 6123 gc_in_progress = 0;
6124 6124
6125 unblock_input ();
6126
6127 consing_until_gc = gc_threshold 6125 consing_until_gc = gc_threshold
6128 = consing_threshold (gc_cons_threshold, Vgc_cons_percentage, 0); 6126 = consing_threshold (gc_cons_threshold, Vgc_cons_percentage, 0);
6129 6127
6128 /* Unblock *after* re-setting `consing_until_gc` in case `unblock_input`
6129 signals an error (see bug#43389). */
6130 unblock_input ();
6131
6130 if (garbage_collection_messages && NILP (Vmemory_full)) 6132 if (garbage_collection_messages && NILP (Vmemory_full))
6131 { 6133 {
6132 if (message_p || minibuf_level > 0) 6134 if (message_p || minibuf_level > 0)