Mercurial > emacs
annotate src/m/hp800.h @ 90200:f9a65d7ebd29
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-68
Merge from emacs--cvs-trunk--0
Patches applied:
* emacs--cvs-trunk--0 (patch 459-473)
- Update from CVS
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 86-87)
- Update from CVS
author | Miles Bader <miles@gnu.org> |
---|---|
date | Thu, 07 Jul 2005 12:43:14 +0000 |
parents | 68c22ea6027c 23a17af379b1 |
children | 2d92f5c9d6ae |
rev | line source |
---|---|
456 | 1 /* machine description file for hp9000 series 800 machines. |
51772
b4397c0420d4
(XSETMARKBIT): Remove unused macro.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
49600
diff
changeset
|
2 Copyright (C) 1987, 2002, 2003 Free Software Foundation, Inc. |
456 | 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) |
456 | 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 | |
64083 | 18 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
19 Boston, MA 02110-1301, USA. */ | |
456 | 20 |
21 | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48438
diff
changeset
|
22 /* The following line tells the configuration script what sort of |
456 | 23 operating system this machine is likely to run. |
24 USUAL-OPSYS="hpux" */ | |
25 | |
9095
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
9040
diff
changeset
|
26 /* 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:
9040
diff
changeset
|
27 is the most significant byte. */ |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
9040
diff
changeset
|
28 |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
9040
diff
changeset
|
29 #define WORDS_BIG_ENDIAN |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
9040
diff
changeset
|
30 |
456 | 31 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a |
32 * group of arguments and treat it as an array of the arguments. */ | |
33 | |
34 #define NO_ARG_ARRAY | |
35 | |
36 /* Define WORD_MACHINE if addresses and such have | |
37 * to be corrected before they can be used as byte counts. */ | |
38 | |
39 #undef WORD_MACHINE | |
40 | |
41 /* Now define a symbol for the cpu type, if your compiler | |
42 does not define it automatically: | |
43 Ones defined so far include vax, m68000, ns16000, pyramid, | |
44 orion, tahoe, APOLLO and many others */ | |
7159
2b5401aa9630
Renamed from hp9000s800.h.
Richard M. Stallman <rms@gnu.org>
parents:
7146
diff
changeset
|
45 #ifndef hp9000s800 |
2b5401aa9630
Renamed from hp9000s800.h.
Richard M. Stallman <rms@gnu.org>
parents:
7146
diff
changeset
|
46 # define hp9000s800 |
456 | 47 #endif |
48 | |
49 /* Use type int rather than a union, to represent Lisp_Object */ | |
50 /* This is desirable for most machines. */ | |
51 | |
52 #define NO_UNION_TYPE | |
53 | |
54 /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend | |
10362
f145d62266f6
(VALBITS, GCTYPEBITS): Deleted; default is better.
Karl Heuer <kwzh@gnu.org>
parents:
9258
diff
changeset
|
55 the bit field into an int. In other words, if bit fields |
456 | 56 are always unsigned. |
57 | |
58 If you use NO_UNION_TYPE, this flag does not matter. */ | |
59 | |
60 #define EXPLICIT_SIGN_EXTEND | |
61 | |
14135
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
62 /* The standard definitions of these macros would work ok, |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
63 but these are faster because the constants are short. */ |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48438
diff
changeset
|
64 |
14135
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
65 |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
66 #define XUINT(a) (((unsigned)(a) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS) |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
67 |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
68 #define XSET(var, type, ptr) \ |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
69 ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
70 |
41942
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
71 /* Common definitions for HPUX and GNU/Linux. */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
72 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
73 #if defined (__hpux) || defined (GNU_LINUX) |
14135
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
74 /* Now define a symbol for the cpu type, if your compiler |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
75 does not define it automatically: |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
76 Ones defined so far include vax, m68000, ns16000, pyramid, |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
77 orion, tahoe, APOLLO and many others */ |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
78 #ifndef hp9000s800 |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
79 # define hp9000s800 |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
80 #endif |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
81 |
456 | 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 | |
41942
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
88 /* Define NO_REMAP if memory segmentation makes it not work well |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
89 to change the boundary between the text section and data section |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
90 when Emacs is dumped. If you define this, the preloaded Lisp |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
91 code will not be sharable; but that's better than failing completely. */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
92 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
93 #define NO_REMAP |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
94 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
95 #endif /* __hpux or GNU_LINUX */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
96 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
97 /* Stuff for just GNU/Linux. */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
98 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
99 #ifdef GNU_LINUX |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
100 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
101 /* Data type of load average, as read out of kmem. */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
102 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
103 #define LOAD_AVE_TYPE long |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
104 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
105 /* Convert that into an integer that is 100 for a load average of 1.0 */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
106 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
107 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE) |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
108 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
109 #endif /* GNU_LINUX */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
110 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
111 /* Stuff for just HPUX. */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
112 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
113 #ifdef __hpux |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
114 |
456 | 115 /* Define VIRT_ADDR_VARIES if the virtual addresses of |
116 pure and impure space as loaded can vary, and even their | |
117 relative order cannot be relied on. | |
118 | |
119 Otherwise Emacs assumes that text space precedes data space, | |
120 numerically. */ | |
121 | |
122 #define VIRT_ADDR_VARIES | |
123 | |
124 /* the data segment on this machine always starts at address 0x40000000. */ | |
125 | |
126 #define DATA_SEG_BITS 0x40000000 | |
127 | |
128 #define DATA_START 0x40000000 | |
129 #define TEXT_START 0x00000000 | |
130 | |
131 /* This machine requires completely different unexec code | |
132 which lives in a separate file. Specify the file name. */ | |
133 | |
134 #define UNEXEC unexhp9k800.o | |
135 | |
136 #define LIBS_MACHINE | |
137 #define LIBS_DEBUG | |
138 | |
14135
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
139 /* Include the file bsdtty.h, since this machine has job control. */ |
456 | 140 #define NEED_BSDTTY |
41942
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
141 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
142 /* Data type of load average, as read out of kmem. */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
143 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
144 #define LOAD_AVE_TYPE double |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
145 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
146 /* Convert that into an integer that is 100 for a load average of 1.0 */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
147 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
148 #define LOAD_AVE_CVT(x) ((int) (x * 100.0)) |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
149 |
456 | 150 /* The symbol in the kernel where the load average is found |
151 is named _avenrun. At this time there are two major flavors | |
152 of hp-ux (there is the s800 and s300 (s200) flavors). The | |
153 differences are thusly moved to the corresponding machine description file. | |
154 */ | |
155 | |
156 /* no underscore please */ | |
157 #define LDAV_SYMBOL "avenrun" | |
158 | |
159 #if 0 /* Supposedly no longer true. */ | |
160 /* In hpux, for unknown reasons, S_IFLNK is defined even though | |
161 symbolic links do not exist. | |
162 Make sure our conditionals based on S_IFLNK are not confused. | |
163 | |
164 Here we assume that stat.h is included before config.h | |
165 so that we can override it here. */ | |
166 | |
167 #undef S_IFLNK | |
168 #endif | |
169 | |
170 /* On USG systems these have different names. */ | |
171 | |
172 #define index strchr | |
173 #define rindex strrchr | |
174 | |
14135
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
175 #endif /* __hpux */ |
52401 | 176 |
177 /* arch-tag: 809436e6-1645-4b92-b40d-2de5d6e7227c | |
178 (do not change this comment) */ |