Commit | Line | Data |
---|---|---|
20c428fd | 1 | /* machine description file for hp9000 series 800 machines. |
c74abe0a | 2 | Copyright (C) 1987, 2002, 2003 Free Software Foundation, Inc. |
20c428fd JB |
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 | ||
177c0ea7 | 22 | /* The following line tells the configuration script what sort of |
20c428fd JB |
23 | operating system this machine is likely to run. |
24 | USUAL-OPSYS="hpux" */ | |
25 | ||
74d3f806 KH |
26 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
27 | is the most significant byte. */ | |
28 | ||
29 | #define WORDS_BIG_ENDIAN | |
30 | ||
20c428fd JB |
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 | ||
20c428fd JB |
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 */ | |
3ccd3c98 RS |
45 | #ifndef hp9000s800 |
46 | # define hp9000s800 | |
20c428fd JB |
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 | |
09b3d662 | 55 | the bit field into an int. In other words, if bit fields |
20c428fd JB |
56 | are always unsigned. |
57 | ||
58 | If you use NO_UNION_TYPE, this flag does not matter. */ | |
59 | ||
60 | #define EXPLICIT_SIGN_EXTEND | |
61 | ||
4174709a KH |
62 | /* The standard definitions of these macros would work ok, |
63 | but these are faster because the constants are short. */ | |
177c0ea7 | 64 | |
4174709a KH |
65 | |
66 | #define XUINT(a) (((unsigned)(a) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS) | |
67 | ||
68 | #define XSET(var, type, ptr) \ | |
69 | ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) | |
4174709a | 70 | \f |
383c5d6e RS |
71 | /* Common definitions for HPUX and GNU/Linux. */ |
72 | ||
73 | #if defined (__hpux) || defined (GNU_LINUX) | |
4174709a KH |
74 | /* Now define a symbol for the cpu type, if your compiler |
75 | does not define it automatically: | |
76 | Ones defined so far include vax, m68000, ns16000, pyramid, | |
77 | orion, tahoe, APOLLO and many others */ | |
78 | #ifndef hp9000s800 | |
79 | # define hp9000s800 | |
80 | #endif | |
81 | ||
383c5d6e RS |
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 | ||
383c5d6e RS |
88 | /* Define NO_REMAP if memory segmentation makes it not work well |
89 | to change the boundary between the text section and data section | |
90 | when Emacs is dumped. If you define this, the preloaded Lisp | |
91 | code will not be sharable; but that's better than failing completely. */ | |
92 | ||
93 | #define NO_REMAP | |
94 | ||
95 | #endif /* __hpux or GNU_LINUX */ | |
96 | \f | |
97 | /* Stuff for just GNU/Linux. */ | |
98 | ||
99 | #ifdef GNU_LINUX | |
100 | ||
20c428fd JB |
101 | /* Data type of load average, as read out of kmem. */ |
102 | ||
383c5d6e | 103 | #define LOAD_AVE_TYPE long |
20c428fd JB |
104 | |
105 | /* Convert that into an integer that is 100 for a load average of 1.0 */ | |
106 | ||
383c5d6e | 107 | #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE) |
20c428fd | 108 | |
383c5d6e RS |
109 | #endif /* GNU_LINUX */ |
110 | \f | |
111 | /* Stuff for just HPUX. */ | |
20c428fd | 112 | |
383c5d6e | 113 | #ifdef __hpux |
20c428fd JB |
114 | |
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 | |
20c428fd JB |
123 | \f |
124 | /* the data segment on this machine always starts at address 0x40000000. */ | |
125 | ||
126 | #define DATA_SEG_BITS 0x40000000 | |
127 | ||
20c428fd JB |
128 | #define DATA_START 0x40000000 |
129 | #define TEXT_START 0x00000000 | |
130 | ||
20c428fd JB |
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 | ||
4174709a | 139 | /* Include the file bsdtty.h, since this machine has job control. */ |
20c428fd | 140 | #define NEED_BSDTTY |
383c5d6e RS |
141 | |
142 | /* Data type of load average, as read out of kmem. */ | |
143 | ||
144 | #define LOAD_AVE_TYPE double | |
145 | ||
146 | /* Convert that into an integer that is 100 for a load average of 1.0 */ | |
147 | ||
148 | #define LOAD_AVE_CVT(x) ((int) (x * 100.0)) | |
149 | ||
20c428fd JB |
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" | |
20c428fd JB |
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 | ||
20c428fd JB |
170 | /* On USG systems these have different names. */ |
171 | ||
172 | #define index strchr | |
173 | #define rindex strrchr | |
174 | ||
4174709a | 175 | #endif /* __hpux */ |
6b61353c KH |
176 | |
177 | /* arch-tag: 809436e6-1645-4b92-b40d-2de5d6e7227c | |
178 | (do not change this comment) */ |