Mercurial > emacs
annotate src/m/hp800.h @ 50535:32b881425e3d
(sort-coding-systems): Lower the
priorities of all utf-16 base coding systems.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Fri, 11 Apr 2003 00:41:40 +0000 |
parents | 23a1cea22d13 |
children | b4397c0420d4 d7ddb3e565de |
rev | line source |
---|---|
456 | 1 /* machine description file for hp9000 series 800 machines. |
44601
4be8406ebef9
Don't define HAVE_ALLOCA, C_ALLOCA and STACK_DIRECTION, now set by autoconf.
Andreas Schwab <schwab@suse.de>
parents:
41942
diff
changeset
|
2 Copyright (C) 1987, 2002 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 | |
14186
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
14135
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:
14135
diff
changeset
|
19 Boston, MA 02111-1307, 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 |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
71 #define XMARKBIT(a) ((a) < 0) |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
72 #define XSETMARKBIT(a,b) ((a) = ((b) ? (a)|MARKBIT : (a) & ~MARKBIT)) |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
73 |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
74 #if 0 /* Loses when sign bit of type field is set. */ |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
75 #define XUNMARK(a) ((a) = (((a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
76 #endif |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
77 |
41942
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
78 /* 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
|
79 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
80 #if defined (__hpux) || defined (GNU_LINUX) |
14135
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
81 /* 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
|
82 does not define it automatically: |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
83 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
|
84 orion, tahoe, APOLLO and many others */ |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
85 #ifndef hp9000s800 |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
86 # define hp9000s800 |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
87 #endif |
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
88 |
456 | 89 /* Define CANNOT_DUMP on machines where unexec does not work. |
90 Then the function dump-emacs will not be defined | |
91 and temacs will do (load "loadup") automatically unless told otherwise. */ | |
92 | |
93 #undef CANNOT_DUMP | |
94 | |
41942
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
95 /* 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
|
96 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
|
97 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
|
98 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
|
99 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
100 #define NO_REMAP |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
101 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
102 #endif /* __hpux or GNU_LINUX */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
103 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
104 /* Stuff for just GNU/Linux. */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
105 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
106 #ifdef GNU_LINUX |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
107 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
108 /* 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
|
109 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
110 #define LOAD_AVE_TYPE long |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
111 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
112 /* 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
|
113 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
114 #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
|
115 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
116 #endif /* GNU_LINUX */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
117 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
118 /* Stuff for just HPUX. */ |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
119 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
120 #ifdef __hpux |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
121 |
456 | 122 /* Define VIRT_ADDR_VARIES if the virtual addresses of |
123 pure and impure space as loaded can vary, and even their | |
124 relative order cannot be relied on. | |
125 | |
126 Otherwise Emacs assumes that text space precedes data space, | |
127 numerically. */ | |
128 | |
129 #define VIRT_ADDR_VARIES | |
130 | |
131 /* the data segment on this machine always starts at address 0x40000000. */ | |
132 | |
133 #define DATA_SEG_BITS 0x40000000 | |
134 | |
135 #define DATA_START 0x40000000 | |
136 #define TEXT_START 0x00000000 | |
137 | |
138 /* This machine requires completely different unexec code | |
139 which lives in a separate file. Specify the file name. */ | |
140 | |
141 #define UNEXEC unexhp9k800.o | |
142 | |
143 #define LIBS_MACHINE | |
144 #define LIBS_DEBUG | |
145 | |
14135
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
146 /* Include the file bsdtty.h, since this machine has job control. */ |
456 | 147 #define NEED_BSDTTY |
41942
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
148 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
149 /* 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
|
150 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
151 #define LOAD_AVE_TYPE double |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
152 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
153 /* 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
|
154 |
c22a32af6f1c
Split the __hpux conditional into the parts
Richard M. Stallman <rms@gnu.org>
parents:
14186
diff
changeset
|
155 #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
|
156 |
456 | 157 /* The symbol in the kernel where the load average is found |
158 is named _avenrun. At this time there are two major flavors | |
159 of hp-ux (there is the s800 and s300 (s200) flavors). The | |
160 differences are thusly moved to the corresponding machine description file. | |
161 */ | |
162 | |
163 /* no underscore please */ | |
164 #define LDAV_SYMBOL "avenrun" | |
165 | |
166 #if 0 /* Supposedly no longer true. */ | |
167 /* In hpux, for unknown reasons, S_IFLNK is defined even though | |
168 symbolic links do not exist. | |
169 Make sure our conditionals based on S_IFLNK are not confused. | |
170 | |
171 Here we assume that stat.h is included before config.h | |
172 so that we can override it here. */ | |
173 | |
174 #undef S_IFLNK | |
175 #endif | |
176 | |
177 /* On USG systems these have different names. */ | |
178 | |
179 #define index strchr | |
180 #define rindex strrchr | |
181 | |
14135
51d3a3fa828c
Conditionalize many macro definitions on __hpux.
Karl Heuer <kwzh@gnu.org>
parents:
13365
diff
changeset
|
182 #endif /* __hpux */ |