diff options
| -rw-r--r-- | src/ChangeLog | 7 | ||||
| -rw-r--r-- | src/print.c | 2 |
2 files changed, 8 insertions, 1 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index a9bac7dbf6..01eb385d03 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,10 @@ +2007-11-22 Andreas Schwab <[email protected]> + + * 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 <[email protected]> * 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 acac49eb80..3a2e692672 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 |