From 9b099ce56b0a5a952c096568c28b1007d321ee24 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sat, 8 Dec 2018 10:42:50 -0800 Subject: [PATCH] * src/alloc.c (allocate_vectorlike): Simplify. --- src/alloc.c | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) 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); -- 2.39.2