(print_object): Add cast when passing EMACS_INT

values to sprintf.

(print_object): Add cast when passing EMACS_INT
values to sprintf.
6af1696d · Andreas Schwab · 959e1b49 · 6af1696d · 6af1696d
Commit 6af1696d authored Nov 22, 2007 by Andreas Schwab
Hide whitespace changes
Inline Side-by-side

Showing with 8 additions and 1 deletion

src/ChangeLog src/ChangeLog +7 -0

src/print.c src/print.c +1 -1

No files found.
--- a/src/ChangeLog
+++ b/src/ChangeLog
+2007-11-22  Andreas Schwab  <schwab@suse.de>
+
+	* data.c (Fnumber_to_string): Add cast when passing EMACS_INT
+	values to sprintf.
+	* keymap.c (Fsingle_key_description): Likewise.
+	* print.c (print_object): Likewise.
+
 2007-11-22  Jan Dj,Ad(Brv  <jan.h.d@swipnet.se>

 	* gtkutil.c (update_frame_tool_bar): Don't call x-gtk-map-stock if

--- a/src/print.c
+++ b/src/print.c
@@ -1549,7 +1549,7 @@ print_object (obj, printcharfun, escapeflag)
    {
    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