* alloc.c (allocate_pseudovector): Don't use EMACS_INT when int would do.

diff --git a/src/ChangeLog b/src/ChangeLog
index 6a353aa1f95b6a98590e138760d9cf4fa46fec08..0c3028fb94a82e9baa9b1868551ebc4270f2796e 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -17,6 +17,7 @@
        (inhibit_garbage_collection): Set gc_cons_threshold to max value.
        Previously, this ceilinged at INT_MAX, but that doesn't work on
        64-bit machines.
+       (allocate_pseudovector): Don't use EMACS_INT when int would do.
 
        * alloc.c (Fmake_bool_vector): Don't assume vector size fits in int.
        (allocate_vectorlike): Check for ptrdiff_t overflow.

diff --git a/src/alloc.c b/src/alloc.c
index e04f60baf036fa7b5d9ca57ff9db77ab676de32a..4530e0a7377acc82ae2950a1f41bb12c8d67d04a 100644 (file)
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -2832,7 +2832,7 @@ struct Lisp_Vector *
 allocate_pseudovector (int memlen, int lisplen, EMACS_INT tag)
 {
   struct Lisp_Vector *v = allocate_vectorlike (memlen);
-  EMACS_INT i;
+  int i;
 
   /* Only the first lisplen slots will be traced normally by the GC.  */
   for (i = 0; i < lisplen; ++i)