From: Andreas Schwab Date: Thu, 22 Nov 2007 16:16:09 +0000 (+0000) Subject: (print_object): Add cast when passing EMACS_INT X-Git-Tag: emacs-pretest-23.0.90~9550 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6af1696d06d2221a3bc72557b8a0851c62326cba;p=emacs.git (print_object): Add cast when passing EMACS_INT values to sprintf. --- diff --git a/src/ChangeLog b/src/ChangeLog index a9bac7dbf6b..01eb385d032 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,10 @@ +2007-11-22 Andreas Schwab + + * 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 * gtkutil.c (update_frame_tool_bar): Don't call x-gtk-map-stock if diff --git a/src/print.c b/src/print.c index acac49eb801..3a2e6926729 100644 --- 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