/[emacs]/emacs/src/m/att3b.h
ViewVC logotype

Diff of /emacs/src/m/att3b.h

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.12 by schwab, Mon Apr 15 13:16:31 2002 UTC revision 1.12.2.1 by miles, Fri Apr 4 06:21:10 2003 UTC
# Line 21  the Free Software Foundation, Inc., 59 T Line 21  the Free Software Foundation, Inc., 59 T
21  Boston, MA 02111-1307, USA.  */  Boston, MA 02111-1307, USA.  */
22    
23    
24  /* The following line tells the configuration script what sort of  /* The following line tells the configuration script what sort of
25     operating system this machine is likely to run.     operating system this machine is likely to run.
26     USUAL-OPSYS="usg5-2-2"  */     USUAL-OPSYS="usg5-2-2"  */
27    
# Line 106  Boston, MA 02111-1307, USA.  */ Line 106  Boston, MA 02111-1307, USA.  */
106    
107  #define NBPC 2048  #define NBPC 2048
108    
109    #if 0 /* If this is still needed, don't hard-code assumptions about
110             the number of VALBITS, or other assumptions about the
111             Lisp_Object representation.  Try to extend lisp.h instead, if
112             necessary.  */
113  /* The usual definition of XINT, which involves shifting, does not  /* The usual definition of XINT, which involves shifting, does not
114     sign-extend properly on this machine.  */     sign-extend properly on this machine.  */
115    
116  #define XINT(i) (((sign_extend_temp=(i)) & 0x00800000) \  #define XINT(i) (((sign_extend_temp=(i)) & 0x00800000) \
117                   ? (sign_extend_temp | 0xFF000000) \                   ? (sign_extend_temp | 0xFF000000) \
118                   : (sign_extend_temp & 0x00FFFFFF))                   : (sign_extend_temp & 0x00FFFFFF))
119    #endif
120    
121  #ifdef emacs /* Don't do this when making xmakefile! */  #ifdef emacs /* Don't do this when making xmakefile! */
122  extern int sign_extend_temp;  extern int sign_extend_temp;
123  #endif  #endif
124    
125  #if u3b2 || u3b5 || u3b15  #if u3b2 || u3b5 || u3b15
   
126  /* On 3b2/5/15, data space has high order bit on. */  /* On 3b2/5/15, data space has high order bit on. */
127  #define VALBITS 27  #define DATA_SEG_BITS 0x80000000
 #define VALMASK (((1<<VALBITS) - 1) | (1 << 31))  
 #define XTYPE(a) ((enum Lisp_Type) (((a) >> VALBITS) & GCTYPEMASK))  
   
128  #endif /* 3b2, 3b5 or 3b15 */  #endif /* 3b2, 3b5 or 3b15 */
129    
130  #define TEXT_START 0  #define TEXT_START 0

Legend:
Removed from v.1.12  
changed lines
  Added in v.1.12.2.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26