# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 1002413658 0
# Node ID 6f7166fc8eecb85c6d4818e20b74a5ed78f735c6
# Parent  f5ac153e5b5ce5eb4b41fe8f3989f9c7dbbad5a0
Fix last change.

diff -r f5ac153e5b5c -r 6f7166fc8eec src/lisp.h
--- a/src/lisp.h	Sat Oct 06 23:46:55 2001 +0000
+++ b/src/lisp.h	Sun Oct 07 00:14:18 2001 +0000
@@ -387,10 +387,6 @@
 #define make_number(N)		\
   ((((EMACS_INT) (N)) & VALMASK) | ((EMACS_INT) Lisp_Int) << VALBITS)
 
-#define make_fixnum(x) make_number (x)
-#define MOST_NEGATIVE_FIXNUM	((EMACS_INT) 1 << (VALBITS - 1))
-#define MOST_POSITIVE_FIXNUM	(MOST_NEGATIVE_FIXNUM - 1)
-
 /* During garbage collection, XGCTYPE must be used for extracting types
  so that the mark bit is ignored.  XMARKBIT accesses the markbit.
  Markbits are used only in particular slots of particular structure types.
@@ -472,10 +468,11 @@
 
 #endif /* NO_UNION_TYPE */
 
-/* Largest and smallest representable fixnum values.  */
-
-#define MOST_NEGATIVE_FIXNUM	((EMACS_INT) 1 << (VALBITS - 1))
-#define MOST_POSITIVE_FIXNUM	(MOST_NEGATIVE_FIXNUM - 1)
+/* Largest and smallest representable fixnum values.  These are the C
+   values.  */
+
+#define MOST_NEGATIVE_FIXNUM	- ((EMACS_INT) 1 << (VALBITS - 1))
+#define MOST_POSITIVE_FIXNUM	(((EMACS_INT) 1 << (VALBITS - 1)) - 1)
 
 /* Value is non-zero if C integer I doesn't fit into a Lisp fixnum.  */