1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-16 10:50:49 -08:00

(make_fixnum_or_float): Coerce double to int explicitly.

This commit is contained in:
Stefan Monnier 2001-10-25 05:13:57 +00:00
parent e1010ebe16
commit 5fbf2e842d

View file

@ -3153,4 +3153,4 @@ extern Lisp_Object Vdirectory_sep_char;
fixnum. */
#define make_fixnum_or_float(val) \
(FIXNUM_OVERFLOW_P (val) ? make_float (val) : make_number (val))
(FIXNUM_OVERFLOW_P (val) ? make_float (val) : make_number ((int)(val)))