* src/lisp.h (INTEGER_TO_INT): Fix bug.

diff --git a/src/lisp.h b/src/lisp.h
index 8510ad72564b526ff14b4f3f87b215cbd7e3a25d..ee5a8481ae8e69a154b63217c154bd72270b6b7a 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -2645,7 +2645,7 @@ make_uint (uintmax_t n)
 #define INTEGER_TO_INT(num, type)                                              \
   (TYPE_SIGNED (type)                                                          \
      ? ranged_integer_to_int ((num), TYPE_MINIMUM (type), TYPE_MAXIMUM (type)) \
-     : ranged_integer_to_uint ((num), TYPE_MINIMUM (type)))
+     : ranged_integer_to_uint ((num), TYPE_MAXIMUM (type)))
 
 \f
 /* Forwarding pointer to an int variable.