Mercurial > emacs
annotate src/m/alpha.h @ 22311:599c0971ae49
(Finsert_file_contents): Fix char signedness mismatches.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Mon, 01 Jun 1998 03:32:52 +0000 |
parents | 09b52c2bc2f1 |
children | 1a4c3573a216 |
rev | line source |
---|---|
8836 | 1 /* machine description file For the alpha chip. |
20201
09b52c2bc2f1
(DBL_MIN_REPLACEMENT): New macro.
Paul Eggert <eggert@twinsun.com>
parents:
20031
diff
changeset
|
2 Copyright (C) 1994, 1997 Free Software Foundation, Inc. |
8836 | 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 | |
14186
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
13712
diff
changeset
|
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
13712
diff
changeset
|
19 Boston, MA 02111-1307, USA. */ |
8836 | 20 |
21 | |
22 /* The following line tells the configuration script what sort of | |
23 operating system this machine is likely to run. | |
24 USUAL-OPSYS="note" | |
25 | |
26 NOTE-START | |
27 Use -opsystem=osf1 | |
28 NOTE-END | |
29 | |
30 */ | |
31 | |
13365
2cd15d90fec6
(SHORTBITS, INTBITS, LONGBITS): Deleted; now in config.h
Karl Heuer <kwzh@gnu.org>
parents:
12837
diff
changeset
|
32 #define BITS_PER_LONG 64 |
16132
ba4cdfac3349
(BITS_PER_EMACS_INT): New definition.
Richard M. Stallman <rms@gnu.org>
parents:
16119
diff
changeset
|
33 #define BITS_PER_EMACS_INT 64 |
8836 | 34 |
9095
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
35 /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
36 is the most significant byte. */ |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
37 |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
38 #undef WORDS_BIG_ENDIAN |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
39 |
8836 | 40 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a |
41 * group of arguments and treat it as an array of the arguments. */ | |
42 | |
43 #define NO_ARG_ARRAY | |
44 | |
45 /* Define WORD_MACHINE if addresses and such have | |
46 * to be corrected before they can be used as byte counts. */ | |
47 | |
48 /* #define WORD_MACHINE */ | |
49 | |
50 /* Now define a symbol for the cpu type, if your compiler | |
51 does not define it automatically: | |
52 Ones defined so far include vax, m68000, ns16000, pyramid, | |
53 orion, tahoe, APOLLO and many others */ | |
54 | |
55 /* __alpha defined automatically */ | |
56 | |
57 | |
58 /* Use type EMACS_INT rather than a union, to represent Lisp_Object */ | |
59 /* This is desirable for most machines. */ | |
60 | |
61 #define NO_UNION_TYPE | |
62 | |
63 /* Define the type to use. */ | |
64 #define EMACS_INT long | |
65 #define EMACS_UINT unsigned long | |
11361
48baf159de5c
#define SPECIAL_EMACS_INT
Richard M. Stallman <rms@gnu.org>
parents:
10361
diff
changeset
|
66 #define SPECIAL_EMACS_INT |
8836 | 67 |
68 /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend | |
69 the 24-bit bit field into an int. In other words, if bit fields | |
70 are always unsigned. | |
71 | |
72 If you use NO_UNION_TYPE, this flag does not matter. */ | |
73 | |
74 #define EXPLICIT_SIGN_EXTEND | |
75 | |
76 /* Data type of load average, as read out of kmem. */ | |
77 | |
78 #define LOAD_AVE_TYPE long | |
79 | |
80 /* Convert that into an integer that is 100 for a load average of 1.0 */ | |
81 | |
82 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE) | |
83 | |
84 /* Define CANNOT_DUMP on machines where unexec does not work. | |
85 Then the function dump-emacs will not be defined | |
86 and temacs will do (load "loadup") automatically unless told otherwise. */ | |
87 | |
88 /* #define CANNOT_DUMP */ | |
89 | |
90 /* Define VIRT_ADDR_VARIES if the virtual addresses of | |
91 pure and impure space as loaded can vary, and even their | |
92 relative order cannot be relied on. | |
93 | |
94 Otherwise Emacs assumes that text space precedes data space, | |
95 numerically. */ | |
96 | |
97 /* #define VIRT_ADDR_VARIES */ | |
98 | |
99 /* Define C_ALLOCA if this machine does not support a true alloca | |
100 and the one written in C should be used instead. | |
101 Define HAVE_ALLOCA to say that the system provides a properly | |
102 working alloca function and it should be used. | |
103 Define neither one if an assembler-language alloca | |
104 in the file alloca.s should be used. */ | |
105 | |
106 #define HAVE_ALLOCA | |
107 | |
108 /* GNU malloc and the relocating allocator do not work together | |
11979
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
109 with X. [Who wrote that?] */ |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
110 |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
111 /* May 1995: reportedly [Rainer Schoepf <schoepf@uni-mainz.de>] both the |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
112 system and the gnu malloc system work with "alpha-dec-osf3.0" and |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
113 "alpha-dec-osf3.2". */ |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
114 |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
115 /* May 1995: it seems to me [Morten Welinder <terra@diku.dk>] that both |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
116 mallocs work with "alpha-dec-osf2.0", but I daren't break anything |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
117 right now. Feel free to play if you want. */ |
8836 | 118 |
12301
69f08a14593b
(malloc, realloc): If not _MALLOC_INTERNAL, always use void *.
Richard M. Stallman <rms@gnu.org>
parents:
12235
diff
changeset
|
119 /* #define SYSTEM_MALLOC */ |
8836 | 120 |
121 /* Define NO_REMAP if memory segmentation makes it not work well | |
122 to change the boundary between the text section and data section | |
123 when Emacs is dumped. If you define this, the preloaded Lisp | |
124 code will not be sharable; but that's better than failing completely. */ | |
125 | |
126 #define NO_REMAP | |
127 | |
128 /* Some really obscure 4.2-based systems (like Sequent DYNIX) | |
129 * do not support asynchronous I/O (using SIGIO) on sockets, | |
130 * even though it works fine on tty's. If you have one of | |
131 * these systems, define the following, and then use it in | |
132 * config.h (or elsewhere) to decide when (not) to use SIGIO. | |
133 * | |
134 * You'd think this would go in an operating-system description file, | |
135 * but since it only occurs on some, but not all, BSD systems, the | |
136 * reasonable place to select for it is in the machine description | |
137 * file. | |
138 */ | |
139 | |
140 /* #define NO_SOCK_SIGIO */ | |
141 | |
142 | |
15850
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
143 #ifdef __ELF__ |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
144 /* With ELF, make sure that all common symbols get allocated to in the |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
145 data section. Otherwise, the dump of temacs may miss variables in |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
146 the shared library that have been initialized. For example, with |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
147 GNU libc, __malloc_initialized would normally be resolved to the |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
148 shared library's .bss section, which is fatal. */ |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
149 # ifdef __GNUC__ |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
150 # define C_SWITCH_MACHINE -fno-common |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
151 # else |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
152 # error What gives? Fix me if DEC Unix supports ELF now. |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
153 # endif |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
154 #endif |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
155 |
20031
6b1b51bc8b17
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
18101
diff
changeset
|
156 #if defined(__NetBSD__) || defined(__OpenBSD__) |
18101
a6e2435529b5
[__NetBSD__]: Include stdlib.h, not alloca.h.
Richard M. Stallman <rms@gnu.org>
parents:
17887
diff
changeset
|
157 #define ORDINARY_LINK |
a6e2435529b5
[__NetBSD__]: Include stdlib.h, not alloca.h.
Richard M. Stallman <rms@gnu.org>
parents:
17887
diff
changeset
|
158 #endif |
a6e2435529b5
[__NetBSD__]: Include stdlib.h, not alloca.h.
Richard M. Stallman <rms@gnu.org>
parents:
17887
diff
changeset
|
159 |
15851
9aaeb5dc2851
[__ELF__] (UNEXEC): Use unexelf1.c.
Richard M. Stallman <rms@gnu.org>
parents:
15850
diff
changeset
|
160 #ifdef __ELF__ |
9aaeb5dc2851
[__ELF__] (UNEXEC): Use unexelf1.c.
Richard M. Stallman <rms@gnu.org>
parents:
15850
diff
changeset
|
161 #undef UNEXEC |
16119
8b44e50334a8
(UNEXEC): Use unexelf.c.
Richard M. Stallman <rms@gnu.org>
parents:
15851
diff
changeset
|
162 #define UNEXEC unexelf.o |
15851
9aaeb5dc2851
[__ELF__] (UNEXEC): Use unexelf1.c.
Richard M. Stallman <rms@gnu.org>
parents:
15850
diff
changeset
|
163 #endif |
9aaeb5dc2851
[__ELF__] (UNEXEC): Use unexelf1.c.
Richard M. Stallman <rms@gnu.org>
parents:
15850
diff
changeset
|
164 |
15850
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
165 #ifndef __ELF__ |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
166 |
8836 | 167 /* Describe layout of the address space in an executing process. */ |
168 | |
169 #define TEXT_START 0x120000000 | |
170 #define DATA_START 0x140000000 | |
171 | |
172 /* This is necessary for mem-limits.h, so that start_of_data gives | |
173 the correct value */ | |
174 | |
175 #define DATA_SEG_BITS 0x140000000 | |
176 | |
15850
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
177 /* The program to be used for unexec. */ |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
178 |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
179 #define UNEXEC unexalpha.o |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
180 |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
181 #endif /* notdef __ELF__ */ |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
182 |
12836
0b4d6d2de098
Test OSF1, not __osf1__.
Richard M. Stallman <rms@gnu.org>
parents:
12835
diff
changeset
|
183 #ifdef OSF1 |
8836 | 184 #define ORDINARY_LINK |
185 | |
12146
3cc9c1ed504d
(LIBS_MACHINE): Define to -ldnet or -ldnet_stub.
Karl Heuer <kwzh@gnu.org>
parents:
11979
diff
changeset
|
186 /* Some systems seem to have this, others don't. */ |
3cc9c1ed504d
(LIBS_MACHINE): Define to -ldnet or -ldnet_stub.
Karl Heuer <kwzh@gnu.org>
parents:
11979
diff
changeset
|
187 #ifdef HAVE_LIBDNET |
3cc9c1ed504d
(LIBS_MACHINE): Define to -ldnet or -ldnet_stub.
Karl Heuer <kwzh@gnu.org>
parents:
11979
diff
changeset
|
188 #define LIBS_MACHINE -ldnet |
3cc9c1ed504d
(LIBS_MACHINE): Define to -ldnet or -ldnet_stub.
Karl Heuer <kwzh@gnu.org>
parents:
11979
diff
changeset
|
189 #else |
3cc9c1ed504d
(LIBS_MACHINE): Define to -ldnet or -ldnet_stub.
Karl Heuer <kwzh@gnu.org>
parents:
11979
diff
changeset
|
190 #define LIBS_MACHINE -ldnet_stub |
3cc9c1ed504d
(LIBS_MACHINE): Define to -ldnet or -ldnet_stub.
Karl Heuer <kwzh@gnu.org>
parents:
11979
diff
changeset
|
191 #endif |
12836
0b4d6d2de098
Test OSF1, not __osf1__.
Richard M. Stallman <rms@gnu.org>
parents:
12835
diff
changeset
|
192 #endif /* OSF1 */ |
12146
3cc9c1ed504d
(LIBS_MACHINE): Define to -ldnet or -ldnet_stub.
Karl Heuer <kwzh@gnu.org>
parents:
11979
diff
changeset
|
193 |
12235
6d2e893b7ff7
(LD_SWITCH_MACHINE): Don't define it.
Richard M. Stallman <rms@gnu.org>
parents:
12146
diff
changeset
|
194 #if 0 /* Rainer Schoepf <schoepf@uni-mainz.de> says this loses with X11R6 |
6d2e893b7ff7
(LD_SWITCH_MACHINE): Don't define it.
Richard M. Stallman <rms@gnu.org>
parents:
12146
diff
changeset
|
195 since it has only shared libraries. */ |
11979
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
196 #ifndef __GNUC__ |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
197 /* This apparently is for the system ld as opposed to Gnu ld. */ |
9738
511563c17f9c
(LD_SWITCH_MACHINE): New definition.
Richard M. Stallman <rms@gnu.org>
parents:
9256
diff
changeset
|
198 #ifdef OSF1 |
511563c17f9c
(LD_SWITCH_MACHINE): New definition.
Richard M. Stallman <rms@gnu.org>
parents:
9256
diff
changeset
|
199 #define LD_SWITCH_MACHINE -non_shared |
511563c17f9c
(LD_SWITCH_MACHINE): New definition.
Richard M. Stallman <rms@gnu.org>
parents:
9256
diff
changeset
|
200 #endif |
11979
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
201 #endif |
12235
6d2e893b7ff7
(LD_SWITCH_MACHINE): Don't define it.
Richard M. Stallman <rms@gnu.org>
parents:
12146
diff
changeset
|
202 #endif /* 0 */ |
9738
511563c17f9c
(LD_SWITCH_MACHINE): New definition.
Richard M. Stallman <rms@gnu.org>
parents:
9256
diff
changeset
|
203 |
12836
0b4d6d2de098
Test OSF1, not __osf1__.
Richard M. Stallman <rms@gnu.org>
parents:
12835
diff
changeset
|
204 #ifdef OSF1 |
8836 | 205 #define LIBS_DEBUG |
206 #define START_FILES pre-crt0.o | |
12825
cbc13edaa77d
(LIBS_DEBUG, START_FILES, LIBS_MACHINE): Define only if __osf1__.
Richard M. Stallman <rms@gnu.org>
parents:
12450
diff
changeset
|
207 #endif |
8836 | 208 |
15850
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
209 #if defined (LINUX) && __GNU_LIBRARY__ - 0 < 6 |
13616
0e584934cd9e
[LINUX] (LINUX_SBRK_BUG): Defined.
Richard M. Stallman <rms@gnu.org>
parents:
13534
diff
changeset
|
210 /* This controls a conditional in main. */ |
0e584934cd9e
[LINUX] (LINUX_SBRK_BUG): Defined.
Richard M. Stallman <rms@gnu.org>
parents:
13534
diff
changeset
|
211 #define LINUX_SBRK_BUG |
0e584934cd9e
[LINUX] (LINUX_SBRK_BUG): Defined.
Richard M. Stallman <rms@gnu.org>
parents:
13534
diff
changeset
|
212 #endif |
8836 | 213 |
214 | |
215 #define PNTR_COMPARISON_TYPE unsigned long | |
216 | |
10361
ad238f4988c0
(VALBITS): Adjust for new bit layout.
Karl Heuer <kwzh@gnu.org>
parents:
9738
diff
changeset
|
217 /* On the 64 bit architecture, we can use 60 bits for addresses */ |
8836 | 218 |
10361
ad238f4988c0
(VALBITS): Adjust for new bit layout.
Karl Heuer <kwzh@gnu.org>
parents:
9738
diff
changeset
|
219 #define VALBITS 60 |
8836 | 220 |
221 | |
222 /* This definition of MARKBIT is necessary because of the comparison of | |
223 ARRAY_MARK_FLAG and MARKBIT in an #if in lisp.h, which cpp doesn't like. */ | |
224 | |
225 #define MARKBIT 0x8000000000000000L | |
226 | |
227 | |
228 /* Define XINT and XUINT so that they can take arguments of type int */ | |
229 | |
13365
2cd15d90fec6
(SHORTBITS, INTBITS, LONGBITS): Deleted; now in config.h
Karl Heuer <kwzh@gnu.org>
parents:
12837
diff
changeset
|
230 #define XINT(a) (((long) (a) << (BITS_PER_LONG - VALBITS)) >> (BITS_PER_LONG - VALBITS)) |
12146
3cc9c1ed504d
(LIBS_MACHINE): Define to -ldnet or -ldnet_stub.
Karl Heuer <kwzh@gnu.org>
parents:
11979
diff
changeset
|
231 #define XUINT(a) ((long) (a) & VALMASK) |
8836 | 232 |
233 /* Define XPNTR to avoid or'ing with DATA_SEG_BITS */ | |
234 | |
235 #define XPNTR(a) XUINT (a) | |
11361
48baf159de5c
#define SPECIAL_EMACS_INT
Richard M. Stallman <rms@gnu.org>
parents:
10361
diff
changeset
|
236 |
48baf159de5c
#define SPECIAL_EMACS_INT
Richard M. Stallman <rms@gnu.org>
parents:
10361
diff
changeset
|
237 /* Declare malloc and realloc in a way that is clean. |
48baf159de5c
#define SPECIAL_EMACS_INT
Richard M. Stallman <rms@gnu.org>
parents:
10361
diff
changeset
|
238 But not in makefiles! */ |
48baf159de5c
#define SPECIAL_EMACS_INT
Richard M. Stallman <rms@gnu.org>
parents:
10361
diff
changeset
|
239 |
48baf159de5c
#define SPECIAL_EMACS_INT
Richard M. Stallman <rms@gnu.org>
parents:
10361
diff
changeset
|
240 #ifndef NOT_C_CODE |
48baf159de5c
#define SPECIAL_EMACS_INT
Richard M. Stallman <rms@gnu.org>
parents:
10361
diff
changeset
|
241 /* We need these because pointers are larger than the default ints. */ |
20031
6b1b51bc8b17
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
18101
diff
changeset
|
242 #if !defined(__NetBSD__) && !defined(__OpenBSD__) |
11361
48baf159de5c
#define SPECIAL_EMACS_INT
Richard M. Stallman <rms@gnu.org>
parents:
10361
diff
changeset
|
243 #include <alloca.h> |
18101
a6e2435529b5
[__NetBSD__]: Include stdlib.h, not alloca.h.
Richard M. Stallman <rms@gnu.org>
parents:
17887
diff
changeset
|
244 #else |
a6e2435529b5
[__NetBSD__]: Include stdlib.h, not alloca.h.
Richard M. Stallman <rms@gnu.org>
parents:
17887
diff
changeset
|
245 #include <stdlib.h> |
a6e2435529b5
[__NetBSD__]: Include stdlib.h, not alloca.h.
Richard M. Stallman <rms@gnu.org>
parents:
17887
diff
changeset
|
246 #endif |
11696
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
247 |
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
248 /* Hack alert! For reasons unknown to mankind the string.h file insists |
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
249 on defining bcopy etc. as taking char pointers as arguments. With |
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
250 Emacs this produces an endless amount of warning which are harmless, |
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
251 but tends to flood the real errors. This hack works around this problem |
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
252 by not prototyping. */ |
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
253 #define bcopy string_h_bcopy |
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
254 #define bzero string_h_bzero |
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
255 #define bcmp string_h_bcmp |
11361
48baf159de5c
#define SPECIAL_EMACS_INT
Richard M. Stallman <rms@gnu.org>
parents:
10361
diff
changeset
|
256 #include <string.h> |
11696
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
257 #undef bcopy |
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
258 #undef bzero |
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
259 #undef bcmp |
d43754b30133
(bcopy, bzero, bcmp): Don't let string.h prototype these.
Richard M. Stallman <rms@gnu.org>
parents:
11361
diff
changeset
|
260 |
11979
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
261 /* We need to prototype these for the lib-src programs even if we don't |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
262 use the system malloc for the Emacs proper. */ |
12301
69f08a14593b
(malloc, realloc): If not _MALLOC_INTERNAL, always use void *.
Richard M. Stallman <rms@gnu.org>
parents:
12235
diff
changeset
|
263 #ifdef _MALLOC_INTERNAL |
12235
6d2e893b7ff7
(LD_SWITCH_MACHINE): Don't define it.
Richard M. Stallman <rms@gnu.org>
parents:
12146
diff
changeset
|
264 /* These declarations are designed to match the ones in gmalloc.c. */ |
6d2e893b7ff7
(LD_SWITCH_MACHINE): Don't define it.
Richard M. Stallman <rms@gnu.org>
parents:
12146
diff
changeset
|
265 #if defined (__STDC__) && __STDC__ |
13534
25cd5b83d805
Declare calloc like malloc.
Richard M. Stallman <rms@gnu.org>
parents:
13467
diff
changeset
|
266 extern void *malloc (), *realloc (), *calloc (); |
12235
6d2e893b7ff7
(LD_SWITCH_MACHINE): Don't define it.
Richard M. Stallman <rms@gnu.org>
parents:
12146
diff
changeset
|
267 #else |
13534
25cd5b83d805
Declare calloc like malloc.
Richard M. Stallman <rms@gnu.org>
parents:
13467
diff
changeset
|
268 extern char *malloc (), *realloc (), *calloc (); |
12235
6d2e893b7ff7
(LD_SWITCH_MACHINE): Don't define it.
Richard M. Stallman <rms@gnu.org>
parents:
12146
diff
changeset
|
269 #endif |
12301
69f08a14593b
(malloc, realloc): If not _MALLOC_INTERNAL, always use void *.
Richard M. Stallman <rms@gnu.org>
parents:
12235
diff
changeset
|
270 #else /* not _MALLOC_INTERNAL */ |
13534
25cd5b83d805
Declare calloc like malloc.
Richard M. Stallman <rms@gnu.org>
parents:
13467
diff
changeset
|
271 extern void *malloc (), *realloc (), *calloc (); |
12301
69f08a14593b
(malloc, realloc): If not _MALLOC_INTERNAL, always use void *.
Richard M. Stallman <rms@gnu.org>
parents:
12235
diff
changeset
|
272 #endif /* not _MALLOC_INTERNAL */ |
69f08a14593b
(malloc, realloc): If not _MALLOC_INTERNAL, always use void *.
Richard M. Stallman <rms@gnu.org>
parents:
12235
diff
changeset
|
273 |
11979
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
274 |
11361
48baf159de5c
#define SPECIAL_EMACS_INT
Richard M. Stallman <rms@gnu.org>
parents:
10361
diff
changeset
|
275 extern long *xmalloc (), *xrealloc (); |
11979
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
276 |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
277 #ifdef REL_ALLOC |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
278 #ifndef _MALLOC_INTERNAL |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
279 /* "char *" because ralloc.c defines it that way. gmalloc.c thinks it |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
280 is allowed to prototype these as "void *" so we don't prototype in |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
281 that case. You're right: it stinks! */ |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
282 extern char *r_alloc (), *r_re_alloc (); |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
283 extern void r_alloc_free (); |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
284 #endif /* not _MALLOC_INTERNAL */ |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
285 #endif /* REL_ALLOC */ |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
286 |
10035163f8d5
(LD_SWITCH_MACHINE) [!__GNUC__]: Don't define.
Karl Heuer <kwzh@gnu.org>
parents:
11696
diff
changeset
|
287 #endif /* not NOT_C_CODE */ |
12450
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
288 |
12836
0b4d6d2de098
Test OSF1, not __osf1__.
Richard M. Stallman <rms@gnu.org>
parents:
12835
diff
changeset
|
289 #ifdef OSF1 |
12450
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
290 #define PTY_ITERATION for (i = 0; i < 1; i++) /* ick */ |
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
291 #define PTY_NAME_SPRINTF /* none */ |
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
292 #define PTY_TTY_NAME_SPRINTF /* none */ |
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
293 #define PTY_OPEN \ |
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
294 do \ |
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
295 { \ |
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
296 int dummy; \ |
13712
f4eb849fb233
(PTY_OPEN): Block SIGCHLD during openpty.
Karl Heuer <kwzh@gnu.org>
parents:
13616
diff
changeset
|
297 SIGMASKTYPE mask; \ |
20031
6b1b51bc8b17
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
18101
diff
changeset
|
298 mask = sigblock (sigmask (SIGCHLD)); \ |
12450
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
299 if (-1 == openpty (&fd, &dummy, pty_name, 0, 0)) \ |
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
300 fd = -1; \ |
13712
f4eb849fb233
(PTY_OPEN): Block SIGCHLD during openpty.
Karl Heuer <kwzh@gnu.org>
parents:
13616
diff
changeset
|
301 sigsetmask (mask); \ |
12450
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
302 close (dummy); \ |
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
303 } \ |
2d08a807d233
(PTY_ITERATION, PTY_NAME_SPRINTF, PTY_OPEN)
Richard M. Stallman <rms@gnu.org>
parents:
12301
diff
changeset
|
304 while (0) |
12836
0b4d6d2de098
Test OSF1, not __osf1__.
Richard M. Stallman <rms@gnu.org>
parents:
12835
diff
changeset
|
305 #endif |
12827
b0f8f54fe739
[linux] (COFF, NO_TERMIO): Defined.
Richard M. Stallman <rms@gnu.org>
parents:
12825
diff
changeset
|
306 |
15850
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
307 /* On the Alpha it's best to avoid including TERMIO since struct |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
308 termio and struct termios are mutually incompatible. */ |
12827
b0f8f54fe739
[linux] (COFF, NO_TERMIO): Defined.
Richard M. Stallman <rms@gnu.org>
parents:
12825
diff
changeset
|
309 #define NO_TERMIO |
b0f8f54fe739
[linux] (COFF, NO_TERMIO): Defined.
Richard M. Stallman <rms@gnu.org>
parents:
12825
diff
changeset
|
310 |
20031
6b1b51bc8b17
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
18101
diff
changeset
|
311 #if defined (LINUX) || defined (__NetBSD__) || defined (__OpenBSD__) |
15850
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
312 # define TEXT_END ({ extern int _etext; &_etext; }) |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
313 # ifndef __ELF__ |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
314 # define COFF |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
315 # define DATA_END ({ extern int _EDATA; &_EDATA; }) |
d6c4d581ad25
[__ELF__ && __GNUC__] (C_SWITCH_MACHINE): Add -fno-common.
Richard M. Stallman <rms@gnu.org>
parents:
15719
diff
changeset
|
316 # endif /* notdef __ELF__ */ |
12827
b0f8f54fe739
[linux] (COFF, NO_TERMIO): Defined.
Richard M. Stallman <rms@gnu.org>
parents:
12825
diff
changeset
|
317 #endif |
20031
6b1b51bc8b17
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
18101
diff
changeset
|
318 |
6b1b51bc8b17
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
18101
diff
changeset
|
319 #if (defined (__NetBSD__) || defined (__OpenBSD__)) && defined (__ELF__) |
6b1b51bc8b17
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
18101
diff
changeset
|
320 #define HAVE_TEXT_START |
6b1b51bc8b17
Test __OpenBSD__ along with __NetBSD__.
Richard M. Stallman <rms@gnu.org>
parents:
18101
diff
changeset
|
321 #endif |
20201
09b52c2bc2f1
(DBL_MIN_REPLACEMENT): New macro.
Paul Eggert <eggert@twinsun.com>
parents:
20031
diff
changeset
|
322 |
09b52c2bc2f1
(DBL_MIN_REPLACEMENT): New macro.
Paul Eggert <eggert@twinsun.com>
parents:
20031
diff
changeset
|
323 /* Many Alpha implementations (e.g. gas 2.8) can't handle DBL_MIN: |
09b52c2bc2f1
(DBL_MIN_REPLACEMENT): New macro.
Paul Eggert <eggert@twinsun.com>
parents:
20031
diff
changeset
|
324 they generate code that uses a signaling NaN instead of DBL_MIN. |
09b52c2bc2f1
(DBL_MIN_REPLACEMENT): New macro.
Paul Eggert <eggert@twinsun.com>
parents:
20031
diff
changeset
|
325 Define DBL_MIN_REPLACEMENT to be the next value larger than DBL_MIN: |
09b52c2bc2f1
(DBL_MIN_REPLACEMENT): New macro.
Paul Eggert <eggert@twinsun.com>
parents:
20031
diff
changeset
|
326 this avoids the assembler bug. */ |
09b52c2bc2f1
(DBL_MIN_REPLACEMENT): New macro.
Paul Eggert <eggert@twinsun.com>
parents:
20031
diff
changeset
|
327 #define DBL_MIN_REPLACEMENT 2.2250738585072019e-308 |