From: Stefan Kangas <stefankangas@gmail.com>
Date: Tue, 10 Dec 2024 10:43:54 +0000 (+0100)
Subject: Remove unused function my_heap_start
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bdb4e25105d7f37e9bd33a625f7e237f4c5949cf;p=emacs.git

Remove unused function my_heap_start

* src/alloc.c (my_heap_start) [DOUG_LEA_MALLOC && GNU_LINUX]:
Remove unused function.  Update callers.

(cherry picked from commit ad9adab04284213aefc3872a610779dc633ff541)
---

diff --git a/src/alloc.c b/src/alloc.c
index a3f0403eb02..9fcf828a918 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -219,9 +219,6 @@ malloc_initialize_hook (void)
 
   if (! initialized)
     {
-# ifdef GNU_LINUX
-      my_heap_start ();
-# endif
       malloc_using_checking = getenv ("MALLOC_CHECK_") != NULL;
     }
   else
@@ -257,22 +254,6 @@ voidfuncptr __MALLOC_HOOK_VOLATILE __malloc_initialize_hook EXTERNALLY_VISIBLE
 
 #endif
 
-#if defined DOUG_LEA_MALLOC
-# ifdef GNU_LINUX
-
-/* The address where the heap starts.  */
-void *
-my_heap_start (void)
-{
-  static void *start;
-  if (! start)
-    start = sbrk (0);
-  return start;
-}
-# endif
-
-#endif
-
 /* Mark, unmark, query mark bit of a Lisp string.  S must be a pointer
    to a struct Lisp_String.  */
 
diff --git a/src/lisp.h b/src/lisp.h
index 966568e92cf..5595038f7c7 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -4422,7 +4422,6 @@ extern void parse_str_as_multibyte (const unsigned char *, ptrdiff_t,
 
 /* Defined in alloc.c.  */
 extern intptr_t garbage_collection_inhibited;
-extern void *my_heap_start (void);
 unsigned char *resize_string_data (Lisp_Object, ptrdiff_t, int, int);
 extern void malloc_warning (const char *);
 extern AVOID memory_full (size_t);