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

diff --git a/src/ChangeLog b/src/ChangeLog
index 2bf6cc8..45fe319 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 54c5091..99a276c 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