From: Paul Eggert <eggert@cs.ucla.edu>
Date: Tue, 13 Aug 2019 17:03:41 +0000 (-0700)
Subject: Fix GC threshold typo
X-Git-Tag: emacs-27.0.90~1635
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8882761440c3227850043dddf5aec5394c8cbe28;p=emacs.git

Fix GC threshold typo

Problem reported by Eli Zaretskii (Bug#37006#25).
* src/alloc.c (garbage_collect_1): Fix typo in threshold calc.
Go back to dividing by 10 since the numerator’s a constant now.
Problem introduced in 2019-07-21T02:40:03Z!eggert@cs.ucla.edu.
---

diff --git a/src/alloc.c b/src/alloc.c
index 39833f8decb..c7419e2fa5f 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -5932,8 +5932,8 @@ garbage_collect_1 (struct gcstat *gcst)
     consing_until_gc = memory_full_cons_threshold;
   else
     {
-      intptr_t threshold = min (max (GC_DEFAULT_THRESHOLD,
-				     gc_cons_threshold >> 3),
+      intptr_t threshold = min (max (GC_DEFAULT_THRESHOLD / 10,
+				     gc_cons_threshold),
 				OBJECT_CT_MAX);
       if (FLOATP (Vgc_cons_percentage))
 	{