* src/alloc.c (VECTOR_ELTS_MAX): Make sure it’s signed.

diff --git a/src/alloc.c b/src/alloc.c
index d34b34f27d85b0a43fde9d6aa66fc4022865064c..201e3f0b13f4eef3a1ecab7011b355d10082b75e 100644 (file)
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -3340,9 +3340,10 @@ sweep_vectors (void)
    can be used in an integer constant expression.  */
 
 #define VECTOR_ELTS_MAX \
-  min (((min (PTRDIFF_MAX, SIZE_MAX) - header_size - large_vector_offset) \
-       / word_size), \
-       MOST_POSITIVE_FIXNUM)
+  ((ptrdiff_t) \
+   min (((min (PTRDIFF_MAX, SIZE_MAX) - header_size - large_vector_offset) \
+        / word_size), \
+       MOST_POSITIVE_FIXNUM))
 
 /* Value is a pointer to a newly allocated Lisp_Vector structure
    with room for LEN Lisp_Objects.  LEN must be positive and