]> code.delx.au - gnu-emacs/blob - src/m/iris5d.h
Changes for Silicon Graphics Iris 5D.
[gnu-emacs] / src / m / iris5d.h
1 /* machine description file for Iris-4D machines. Use with s-iris3-6.h
2 Copyright (C) 1987 Free Software Foundation, Inc.
3
4 This file is part of GNU Emacs.
5
6 GNU Emacs is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 1, or (at your option)
9 any later version.
10
11 GNU Emacs is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with GNU Emacs; see the file COPYING. If not, write to
18 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
19
20
21 /* The following line tells the configuration script what sort of
22 operating system this machine is likely to run.
23 USUAL-OPSYS="irix3-3" */
24
25 /* The following three symbols give information on
26 the size of various data types. */
27
28 #define SHORTBITS 16 /* Number of bits in a short */
29
30 #define INTBITS 32 /* Number of bits in an int */
31
32 #define LONGBITS 32 /* Number of bits in a long */
33
34 /* Define BIG_ENDIAN iff lowest-numbered byte in a word
35 is the most significant byte. */
36
37 #define BIG_ENDIAN
38
39 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a
40 * group of arguments and treat it as an array of the arguments. */
41
42 #define NO_ARG_ARRAY
43
44 /* Define WORD_MACHINE if addresses and such have
45 * to be corrected before they can be used as byte counts. */
46
47 #undef WORD_MACHINE
48
49 /* Now define a symbol for the cpu type, if your compiler
50 does not define it automatically:
51 Ones defined so far include vax, m68000, ns16000, pyramid,
52 orion, tahoe, APOLLO and many others */
53
54 #ifndef mips
55 #define mips
56 #endif
57
58 #ifndef IRIS_4D
59 #define IRIS_4D
60 #endif
61
62 /* Use type int rather than a union, to represent Lisp_Object */
63 /* This is desirable for most machines. */
64
65 #define NO_UNION_TYPE
66
67 /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
68 the 24-bit bit field into an int. In other words, if bit fields
69 are always unsigned.
70
71 If you use NO_UNION_TYPE, this flag does not matter. */
72
73 #define EXPLICIT_SIGN_EXTEND
74
75 /* Data type of load average, as read out of kmem. */
76
77 #define LOAD_AVE_TYPE long /* This doesn't quite work on the 4D */
78
79 /* Convert that into an integer that is 100 for a load average of 1.0 */
80
81 #define LOAD_AVE_CVT(x) (int)(((double)(x)*100)/1024.0)
82
83 /* s-iris3-6.h uses /vmunix */
84
85 #undef KERNEL_FILE
86 #define KERNEL_FILE "/unix"
87
88 /* Define CANNOT_DUMP on machines where unexec does not work.
89 Then the function dump-emacs will not be defined
90 and temacs will do (load "loadup") automatically unless told otherwise. */
91
92 #undef CANNOT_DUMP
93
94 /* Define VIRT_ADDR_VARIES if the virtual addresses of
95 pure and impure space as loaded can vary, and even their
96 relative order cannot be relied on.
97
98 Otherwise Emacs assumes that text space precedes data space,
99 numerically. */
100
101 /* #define VIRT_ADDR_VARIES */
102
103 /* Define C_ALLOCA if this machine does not support a true alloca
104 and the one written in C should be used instead.
105 Define HAVE_ALLOCA to say that the system provides a properly
106 working alloca function and it should be used.
107 Define neither one if an assembler-language alloca
108 in the file alloca.s should be used. */
109
110 #define C_ALLOCA
111 /* #define HAVE_ALLOCA */
112
113 /* Define NO_REMAP if memory segmentation makes it not work well
114 to change the boundary between the text section and data section
115 when Emacs is dumped. If you define this, the preloaded Lisp
116 code will not be sharable; but that's better than failing completely. */
117
118 #define NO_REMAP
119
120 /* This machine requires completely different unexec code
121 which lives in a separate file. Specify the file name. */
122
123 #ifdef UNEXEC
124 #undef UNEXEC
125 #endif
126 #define UNEXEC unexelfsgi.o
127
128 #define TEXT_START 0x400000
129
130 /*
131 * DATA_SEG_BITS forces that bit to be or'd in with any pointers which
132 * are trying to access pure strings (as gnu-emacs only allows 24 bits
133 * for the value field of a LISP_OBJECT).
134 */
135
136 #define DATA_START 0x10000000
137 #define DATA_SEG_BITS 0x10000000
138
139 #undef LIBS_MACHINE
140 /* -lsun in case using Yellow Pages for passwords. */
141 #define LIBS_MACHINE -lsun -lmld
142 #define LIBS_DEBUG
143
144 /* Define this if you have a fairly recent system,
145 in which crt1.o and crt1.n should be used. */
146 #define HAVE_CRTN
147
148 #ifdef HAVE_CRTN
149 /* Must define START-FILES so that the linker can find /usr/lib/crt0.o. */
150 #define START_FILES pre-crt0.o /usr/lib/crt1.o
151 #define LIB_STANDARD -lbsd -lc /usr/lib/crtn.o
152 #else
153 #define START_FILES pre-crt0.o /usr/lib/crt0.o
154 /* The entry-point label (start of text segment) is `start', not `__start'. */
155 #define DEFAULT_ENTRY_ADDRESS start
156 #define LIB_STANDARD -lbsd -lc
157 #endif
158 \f
159 /* Use terminfo instead of termcap. */
160
161 #define TERMINFO
162
163 /* sioctl.h should be included where appropriate. */
164
165 #define NEED_SIOCTL
166
167 /* Letter to use in finding device name of first pty,
168 if system supports pty's. 'a' means it is /dev/ptya0 */
169
170 #undef FIRST_PTY_LETTER
171 #define FIRST_PTY_LETTER 'q'
172
173 /* Define STACK_DIRECTION for alloca.c */
174
175 #define STACK_DIRECTION -1
176 \f
177 /* The standard definitions of these macros would work ok,
178 but these are faster because the constants are short. */
179
180 #define XUINT(a) (((unsigned)(a) << INTBITS-VALBITS) >> INTBITS-VALBITS)
181
182 #define XSET(var, type, ptr) \
183 ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << INTBITS-VALBITS) >> INTBITS-VALBITS))
184
185 #define XSETINT(a, b) XSET(a, XTYPE(a), b)
186 #define XSETUINT(a, b) XSET(a, XTYPE(a), b)
187 #define XSETPNTR(a, b) XSET(a, XTYPE(a), b)
188
189 #define XMARKBIT(a) ((a) < 0)
190 #define XSETMARKBIT(a,b) ((a) = ((a) & ~MARKBIT) | ((b) ? MARKBIT : 0))
191 #define XUNMARK(a) ((a) = (((unsigned)(a) << INTBITS-GCTYPEBITS-VALBITS) >> INTBITS-GCTYPEBITS-VALBITS))
192
193 /* Turn off some "helpful" error checks for type mismatches
194 that we can't fix without breaking other machines. */
195 #define C_SWITCH_MACHINE -cckr