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