Make INTEGER_TO_CONS work with -Wconversion

diff --git a/src/lisp.h b/src/lisp.h
index 6d4635f2a7a79bdeec94b11ea1d59f8c94b60178..45e8a0d791284f6c22b324f654b6f8c72c50aabd 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -3568,9 +3568,9 @@ extern Lisp_Object arithcompare (Lisp_Object num1, Lisp_Object num2,
    itself, or a cons of two or three integers, or if all else fails a float.
    I should not have side effects.  */
 #define INTEGER_TO_CONS(i)                                         \
-  (! FIXNUM_OVERFLOW_P (i)                                         \
-   ? make_number (i)                                               \
-   : EXPR_SIGNED (i) ? intbig_to_lisp (i) : uintbig_to_lisp (i))
+  (! FIXNUM_OVERFLOW_P ((i))                                       \
+   ? make_number ((EMACS_INT) (i))                                      \
+   : EXPR_SIGNED ((i)) ? intbig_to_lisp ((i)) : uintbig_to_lisp ((i)))
 extern Lisp_Object intbig_to_lisp (intmax_t);
 extern Lisp_Object uintbig_to_lisp (uintmax_t);