Mercurial > emacs
diff src/editfns.c @ 21202:ef954087e7b9
(Fformat): Properly print floats.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 17 Mar 1998 08:16:35 +0000 |
| parents | ea520c42a342 |
| children | 47e189a470d2 |
line wrap: on
line diff
--- a/src/editfns.c Tue Mar 17 08:14:28 1998 +0000 +++ b/src/editfns.c Tue Mar 17 08:16:35 1998 +0000 @@ -2424,7 +2424,10 @@ format - this_format_start); this_format[format - this_format_start] = 0; - sprintf (p, this_format, XINT (args[n])); + if (INTEGERP (args[n])) + sprintf (p, this_format, XINT (args[n])); + else + sprintf (p, this_format, XFLOAT (args[n])->data); this_nchars = strlen (p); p += this_nchars;