From: Paul Eggert <eggert@cs.ucla.edu>
Date: Sat, 8 Dec 2018 18:42:50 +0000 (-0800)
Subject: * src/alloc.c (allocate_vectorlike): Simplify.
X-Git-Tag: emacs-27.0.90~4024
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9b099ce56b0a5a952c096568c28b1007d321ee24;p=emacs.git

* src/alloc.c (allocate_vectorlike): Simplify.
---

diff --git a/src/alloc.c b/src/alloc.c
index 0e48b33882c..596de3af85e 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -3358,10 +3358,8 @@ allocate_vectorlike (ptrdiff_t len)
 	p = allocate_vector_from_block (vroundup (nbytes));
       else
 	{
-	  struct large_vector *lv
-	    = lisp_malloc ((large_vector_offset + header_size
-			    + len * word_size),
-			   MEM_TYPE_VECTORLIKE);
+	  struct large_vector *lv = lisp_malloc (large_vector_offset + nbytes,
+						 MEM_TYPE_VECTORLIKE);
 	  lv->next = large_vectors;
 	  large_vectors = lv;
 	  p = large_vector_vec (lv);