diff options
| author | Andreas Schwab <[email protected]> | 2007-11-22 16:16:09 +0000 |
|---|---|---|
| committer | Andreas Schwab <[email protected]> | 2007-11-22 16:16:09 +0000 |
| commit | 6af1696d06d2221a3bc72557b8a0851c62326cba (patch) | |
| tree | 975fca42d44ac212eaf7a928478f31e0c8564142 | |
| parent | 959e1b49b1b82f1fc7b16707dc7102df282bb554 (diff) | |
(print_object): Add cast when passing EMACS_INT
values to sprintf.
| -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 |