# HG changeset patch # User Andreas Schwab # Date 1195748162 0 # Node ID ee344f824d4ad556b764d8e917ba5a25a604c4ff # Parent 1cebf9cacc3c70d0c5afbf18d85a46bb0f74d9f5 (print_object): Add cast when passing EMACS_INT values to sprintf. diff -r 1cebf9cacc3c -r ee344f824d4a src/print.c --- a/src/print.c Thu Nov 22 16:15:44 2007 +0000 +++ b/src/print.c Thu Nov 22 16:16:02 2007 +0000 @@ -1549,7 +1549,7 @@ { case Lisp_Int: if (sizeof (int) == sizeof (EMACS_INT)) - sprintf (buf, "%d", XINT (obj)); + sprintf (buf, "%d", (int) XINT (obj)); else if (sizeof (long) == sizeof (EMACS_INT)) sprintf (buf, "%ld", (long) XINT (obj)); else