comparison src/m/att3b.h @ 46607:7ab3db640f08

* m/att3b.h (XINT): Don't define. (VALBITS, VALMASK, XTYPE): Deleted. (DATA_SEG_BITS): Define.

46606:848447fbaf9b

/* Define our page size.  */

#define NBPC 2048

/* 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))

#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))

#endif /* 3b2, 3b5 or 3b15 */

#define TEXT_START 0

/* (short) negative-int doesn't sign-extend correctly */

46607:7ab3db640f08

/* Define our page size.  */

#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 DATA_SEG_BITS 0x80000000
#endif /* 3b2, 3b5 or 3b15 */

#define TEXT_START 0

/* (short) negative-int doesn't sign-extend correctly */