Mercurial > emacs
comparison src/lisp.h @ 40289:c7285f337403
(make_fixnum_or_float): Coerce double to int explicitly.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Thu, 25 Oct 2001 05:13:57 +0000 |
| parents | 17d8e0e81b78 |
| children | 395355a51e28 |
comparison
equal
deleted
inserted
replaced
| 40288:fca327b68ccc | 40289:c7285f337403 |
|---|---|
| 3151 | 3151 |
| 3152 /* Return a fixnum or float, depending on whether VAL fits in a Lisp | 3152 /* Return a fixnum or float, depending on whether VAL fits in a Lisp |
| 3153 fixnum. */ | 3153 fixnum. */ |
| 3154 | 3154 |
| 3155 #define make_fixnum_or_float(val) \ | 3155 #define make_fixnum_or_float(val) \ |
| 3156 (FIXNUM_OVERFLOW_P (val) ? make_float (val) : make_number (val)) | 3156 (FIXNUM_OVERFLOW_P (val) ? make_float (val) : make_number ((int)(val))) |