* lisp.h (make_fixnum_or_float): Remove unnecessary cast to EMACS_INT.

diff --git a/src/ChangeLog b/src/ChangeLog
index 2bf6cc82997a26ac4d613748a1cadb94d51f8616..45fe319474447903d0ee0e308e0b0bc4800332c8 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -5,6 +5,7 @@
        It's confusing to put a bogus integer in a place where the actual
        value does not matter.
        (LIST_END_P): Remove unused macro and its bogus comment.
+       (make_fixnum_or_float): Remove unnecessary cast to EMACS_INT.
 
 2011-06-18  Paul Eggert  <eggert@cs.ucla.edu>
 

diff --git a/src/lisp.h b/src/lisp.h
index 54c509125f8db9110e98bc0135a11505758509bd..99a276c805c6b1095b28a33f28ec690f34ae10c0 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -3625,9 +3625,7 @@ extern void init_system_name (void);
    fixnum.  */
 
 #define make_fixnum_or_float(val) \
-   (FIXNUM_OVERFLOW_P (val) \
-    ? make_float (val) \
-    : make_number ((EMACS_INT)(val)))
+   (FIXNUM_OVERFLOW_P (val) ? make_float (val) : make_number (val))
 
 
 /* Checks the `cycle check' variable CHECK to see if it indicates that