From: Po Lu <luangruo@yahoo.com>
Date: Tue, 15 Apr 2025 01:53:27 +0000 (+0800)
Subject: Avoid performance regressions in unoptimized builds
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=842fad4a1bbf0738a5be39b4b1953fb90ff3986c;p=emacs.git

Avoid performance regressions in unoptimized builds

* src/alloc.c (lisp_malloc): Declare val register.

(cherry picked from commit b4551334508076b10a895e400beba5b3e9a5e14c)
---

diff --git a/src/alloc.c b/src/alloc.c
index 167be74d2f7..07ca8474bf3 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -872,11 +872,13 @@ void *lisp_malloc_loser EXTERNALLY_VISIBLE;
 static void *
 lisp_malloc (size_t nbytes, bool clearit, enum mem_type type)
 {
+  register void *val;
+
 #ifdef GC_MALLOC_CHECK
   allocated_mem_type = type;
 #endif
 
-  void *val = clearit ? calloc (1, nbytes) : malloc (nbytes);
+  val = clearit ? calloc (1, nbytes) : malloc (nbytes);
 
 #if ! USE_LSB_TAG
   /* If the memory just allocated cannot be addressed thru a Lisp