aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/lisp.h7
1 files changed, 1 insertions, 6 deletions
diff --git a/src/lisp.h b/src/lisp.h
index 14a61d3f102..dce61c165cf 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -2841,12 +2841,7 @@ CHECK_FIXNAT (Lisp_Object x)
2841 do { \ 2841 do { \
2842 CHECK_FIXNUM (x); \ 2842 CHECK_FIXNUM (x); \
2843 if (! ((lo) <= XFIXNUM (x) && XFIXNUM (x) <= (hi))) \ 2843 if (! ((lo) <= XFIXNUM (x) && XFIXNUM (x) <= (hi))) \
2844 args_out_of_range_3 \ 2844 args_out_of_range_3 (x, INT_TO_INTEGER (lo), INT_TO_INTEGER (hi)); \
2845 (x, \
2846 make_fixnum ((lo) < 0 && (lo) < MOST_NEGATIVE_FIXNUM \
2847 ? MOST_NEGATIVE_FIXNUM \
2848 : (lo)), \
2849 make_fixnum (min (hi, MOST_POSITIVE_FIXNUM))); \
2850 } while (false) 2845 } while (false)
2851#define CHECK_TYPE_RANGED_INTEGER(type, x) \ 2846#define CHECK_TYPE_RANGED_INTEGER(type, x) \
2852 do { \ 2847 do { \