Mercurial > emacs
annotate src/m/iris5d.h @ 4106:bfc21ea9a00f
(read_char_menu_prompt): If the user rejects a menu,
return t. This makes read_char also return t.
(read_key_sequence): If read_char returned t, return -1.
(Fread_key_sequence): If read_key_sequence returned -1, quit.
(command_loop_1): If read_key_sequence returned -1, loop around.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 15 Jul 1993 06:56:17 +0000 |
parents | 7be0f0a02725 |
children | 191acacfa1ec |
rev | line source |
---|---|
2890 | 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 | |
3699 | 8 the Free Software Foundation; either version 2, or (at your option) |
2890 | 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 | |
2891
c10bb302a315
Changes for Silicon Graphics Iris 5D.
Jim Blandy <jimb@redhat.com>
parents:
2890
diff
changeset
|
123 #ifdef UNEXEC |
c10bb302a315
Changes for Silicon Graphics Iris 5D.
Jim Blandy <jimb@redhat.com>
parents:
2890
diff
changeset
|
124 #undef UNEXEC |
c10bb302a315
Changes for Silicon Graphics Iris 5D.
Jim Blandy <jimb@redhat.com>
parents:
2890
diff
changeset
|
125 #endif |
c10bb302a315
Changes for Silicon Graphics Iris 5D.
Jim Blandy <jimb@redhat.com>
parents:
2890
diff
changeset
|
126 #define UNEXEC unexelfsgi.o |
2890 | 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 | |
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 | |
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 | |
2993
423d4e4acb41
Changes for SGI from Matthew J Brown <mjb@doc.ic.ac.uk>.
Jim Blandy <jimb@redhat.com>
parents:
2891
diff
changeset
|
193 #ifndef __GNUC__ |
2890 | 194 /* Turn off some "helpful" error checks for type mismatches |
195 that we can't fix without breaking other machines. */ | |
196 #define C_SWITCH_MACHINE -cckr | |
2993
423d4e4acb41
Changes for SGI from Matthew J Brown <mjb@doc.ic.ac.uk>.
Jim Blandy <jimb@redhat.com>
parents:
2891
diff
changeset
|
197 #endif |