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