From b0119c682530d420cd07e6b4bb5f4d52904de47d Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Fri, 16 May 1997 05:35:04 +0000
Subject: [PATCH] (mallopt): Declare, if appropriate. (r_alloc_init)
 [DOUG_LEA_MALLOC]: Call mallopt, instead of setting __malloc_extra_blocks.

---
 src/ralloc.c | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/src/ralloc.c b/src/ralloc.c
index 179fd314928..5373212a483 100644
--- a/src/ralloc.c
+++ b/src/ralloc.c
@@ -57,7 +57,12 @@ typedef unsigned long SIZE;
    overlap.  */
 extern void safe_bcopy ();
 
+#ifdef DOUG_LEA_MALLOC
+#define M_TOP_PAD           -2 
+extern int mallopt ();
+#else
 extern int __malloc_extra_blocks;
+#endif
 
 #else /* not emacs */
 
@@ -1119,9 +1124,13 @@ r_alloc_init ()
   page_size = PAGE;
   extra_bytes = ROUNDUP (50000);
 
+#ifdef DOUG_LEA_MALLOC
+    mallopt (M_TOP_PAD, 64 * 4096);
+#else
   /* Give GNU malloc's morecore some hysteresis
      so that we move all the relocatable blocks much less often.  */
   __malloc_extra_blocks = 64;
+#endif
 
   first_heap->end = (POINTER) ROUNDUP (first_heap->start);
 
-- 
2.11.4.GIT