Commit | Line | Data |
---|---|---|
20c428fd JB |
1 | /* machine description file for hp9000 series 800 machines. |
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 | |
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 | |
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="hpux" */ | |
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 | ||
74d3f806 KH |
34 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
35 | is the most significant byte. */ | |
36 | ||
37 | #define WORDS_BIG_ENDIAN | |
38 | ||
20c428fd JB |
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 | ||
20c428fd JB |
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 */ | |
3ccd3c98 RS |
53 | #ifndef hp9000s800 |
54 | # define hp9000s800 | |
20c428fd JB |
55 | #endif |
56 | ||
57 | /* Use type int rather than a union, to represent Lisp_Object */ | |
58 | /* This is desirable for most machines. */ | |
59 | ||
60 | #define NO_UNION_TYPE | |
61 | ||
62 | /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend | |
09b3d662 | 63 | the bit field into an int. In other words, if bit fields |
20c428fd JB |
64 | are always unsigned. |
65 | ||
66 | If you use NO_UNION_TYPE, this flag does not matter. */ | |
67 | ||
68 | #define EXPLICIT_SIGN_EXTEND | |
69 | ||
70 | /* Data type of load average, as read out of kmem. */ | |
71 | ||
72 | #define LOAD_AVE_TYPE double | |
73 | ||
74 | /* Convert that into an integer that is 100 for a load average of 1.0 */ | |
75 | ||
76 | #define LOAD_AVE_CVT(x) ((int) (x * 100.0)) | |
77 | ||
78 | ||
79 | /* Define CANNOT_DUMP on machines where unexec does not work. | |
80 | Then the function dump-emacs will not be defined | |
81 | and temacs will do (load "loadup") automatically unless told otherwise. */ | |
82 | ||
83 | #undef CANNOT_DUMP | |
84 | ||
85 | /* Define VIRT_ADDR_VARIES if the virtual addresses of | |
86 | pure and impure space as loaded can vary, and even their | |
87 | relative order cannot be relied on. | |
88 | ||
89 | Otherwise Emacs assumes that text space precedes data space, | |
90 | numerically. */ | |
91 | ||
92 | #define VIRT_ADDR_VARIES | |
93 | ||
94 | /* Define C_ALLOCA if this machine does not support a true alloca | |
95 | and the one written in C should be used instead. | |
96 | Define HAVE_ALLOCA to say that the system provides a properly | |
97 | working alloca function and it should be used. | |
98 | Define neither one if an assembler-language alloca | |
99 | in the file alloca.s should be used. */ | |
100 | ||
101 | #define C_ALLOCA | |
102 | /* #define HAVE_ALLOCA */ | |
103 | \f | |
104 | /* the data segment on this machine always starts at address 0x40000000. */ | |
105 | ||
106 | #define DATA_SEG_BITS 0x40000000 | |
107 | ||
20c428fd JB |
108 | #define DATA_START 0x40000000 |
109 | #define TEXT_START 0x00000000 | |
110 | ||
111 | #define STACK_DIRECTION 1 | |
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 | ||
123 | #define UNEXEC unexhp9k800.o | |
124 | ||
125 | #define LIBS_MACHINE | |
126 | #define LIBS_DEBUG | |
127 | ||
128 | /* Define NEED_BSDTTY if you have such. */ | |
129 | ||
130 | #define NEED_BSDTTY | |
131 | \f | |
132 | /* The standard definitions of these macros would work ok, | |
133 | but these are faster because the constants are short. */ | |
134 | ||
135 | ||
136 | #define XUINT(a) (((unsigned)(a) << INTBITS-VALBITS) >> INTBITS-VALBITS) | |
137 | ||
138 | #define XSET(var, type, ptr) \ | |
139 | ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << INTBITS-VALBITS) >> INTBITS-VALBITS)) | |
140 | ||
20c428fd JB |
141 | #define XMARKBIT(a) ((a) < 0) |
142 | #define XSETMARKBIT(a,b) ((a) = ((b) ? (a)|MARKBIT : (a) & ~MARKBIT)) | |
143 | ||
144 | #if 0 /* Loses when sign bit of type field is set. */ | |
145 | #define XUNMARK(a) ((a) = (((a) << INTBITS-GCTYPEBITS-VALBITS) >> INTBITS-GCTYPEBITS-VALBITS)) | |
146 | #endif | |
147 | ||
148 | /* The symbol in the kernel where the load average is found | |
149 | is named _avenrun. At this time there are two major flavors | |
150 | of hp-ux (there is the s800 and s300 (s200) flavors). The | |
151 | differences are thusly moved to the corresponding machine description file. | |
152 | */ | |
153 | ||
154 | /* no underscore please */ | |
155 | #define LDAV_SYMBOL "avenrun" | |
20c428fd JB |
156 | |
157 | #if 0 /* Supposedly no longer true. */ | |
158 | /* In hpux, for unknown reasons, S_IFLNK is defined even though | |
159 | symbolic links do not exist. | |
160 | Make sure our conditionals based on S_IFLNK are not confused. | |
161 | ||
162 | Here we assume that stat.h is included before config.h | |
163 | so that we can override it here. */ | |
164 | ||
165 | #undef S_IFLNK | |
166 | #endif | |
167 | ||
168 | /* Define the BSTRING functions in terms of the sysV functions. */ | |
088aaa2d | 169 | /* On HPUX 8.05, including types.h can include strings.h |
63840efa | 170 | which declares these as functions. Hence the #ifndef. */ |
20c428fd | 171 | |
088aaa2d | 172 | #ifndef HAVE_BCOPY |
20c428fd JB |
173 | #define bcopy(a,b,s) memcpy (b,a,s) |
174 | #define bzero(a,s) memset (a,0,s) | |
175 | #define bcmp memcmp | |
088aaa2d | 176 | #endif |
20c428fd JB |
177 | |
178 | /* On USG systems these have different names. */ | |
179 | ||
180 | #define index strchr | |
181 | #define rindex strrchr | |
182 | ||
183 | /* Include the file bsdtty.h, since this machine has job control. */ | |
184 | #define NEED_BSDTTY |