# HG changeset patch
# User Ken Raeburn <raeburn@raeburn.org>
# Date 1027296498 0
# Node ID 7ab3db640f082e52960b134630ef77693c121281
# Parent  848447fbaf9b9a679a96d7611d2211f58d3b9606
* m/att3b.h (XINT): Don't define.
(VALBITS, VALMASK, XTYPE): Deleted.
(DATA_SEG_BITS): Define.

diff -r 848447fbaf9b -r 7ab3db640f08 src/m/att3b.h
--- a/src/m/att3b.h	Sun Jul 21 20:57:16 2002 +0000
+++ b/src/m/att3b.h	Mon Jul 22 00:08:18 2002 +0000
@@ -106,24 +106,25 @@
 
 #define NBPC 2048
 
+#if 0 /* If this is still needed, don't hard-code assumptions about
+	 the number of VALBITS, or other assumptions about the
+	 Lisp_Object representation.  Try to extend lisp.h instead, if
+	 necessary.  */
 /* The usual definition of XINT, which involves shifting, does not
    sign-extend properly on this machine.  */
 
 #define XINT(i) (((sign_extend_temp=(i)) & 0x00800000) \
 		 ? (sign_extend_temp | 0xFF000000) \
 		 : (sign_extend_temp & 0x00FFFFFF))
+#endif
 
 #ifdef emacs /* Don't do this when making xmakefile! */
 extern int sign_extend_temp;
 #endif
 
 #if u3b2 || u3b5 || u3b15
-
 /* On 3b2/5/15, data space has high order bit on. */
-#define VALBITS 27
-#define VALMASK (((1<<VALBITS) - 1) | (1 << 31))
-#define XTYPE(a) ((enum Lisp_Type) (((a) >> VALBITS) & GCTYPEMASK))
-
+#define DATA_SEG_BITS 0x80000000
 #endif /* 3b2, 3b5 or 3b15 */
 
 #define TEXT_START 0