| 1 | /* machine description file for hp9000 series 800 machines. |
| 2 | Copyright (C) 1987, 2002, 2003 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 |
| 8 | the Free Software Foundation; either version 2, 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 |
| 18 | the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
| 19 | Boston, MA 02110-1301, USA. */ |
| 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="hpux" */ |
| 25 | |
| 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 | |
| 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 */ |
| 45 | #ifndef hp9000s800 |
| 46 | # define hp9000s800 |
| 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 |
| 55 | the bit field into an int. In other words, if bit fields |
| 56 | are always unsigned. |
| 57 | |
| 58 | If you use NO_UNION_TYPE, this flag does not matter. */ |
| 59 | |
| 60 | #define EXPLICIT_SIGN_EXTEND |
| 61 | |
| 62 | /* The standard definitions of these macros would work ok, |
| 63 | but these are faster because the constants are short. */ |
| 64 | |
| 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)) |
| 70 | \f |
| 71 | /* Common definitions for HPUX and GNU/Linux. */ |
| 72 | |
| 73 | #if defined (__hpux) || defined (GNU_LINUX) |
| 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 | |
| 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 | |
| 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 | |
| 101 | /* Data type of load average, as read out of kmem. */ |
| 102 | |
| 103 | #define LOAD_AVE_TYPE long |
| 104 | |
| 105 | /* Convert that into an integer that is 100 for a load average of 1.0 */ |
| 106 | |
| 107 | #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE) |
| 108 | |
| 109 | #endif /* GNU_LINUX */ |
| 110 | \f |
| 111 | /* Stuff for just HPUX. */ |
| 112 | |
| 113 | #ifdef __hpux |
| 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 |
| 123 | \f |
| 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 | |
| 139 | /* Include the file bsdtty.h, since this machine has job control. */ |
| 140 | #define NEED_BSDTTY |
| 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 | |
| 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 | |
| 175 | #endif /* __hpux */ |
| 176 | |
| 177 | /* arch-tag: 809436e6-1645-4b92-b40d-2de5d6e7227c |
| 178 | (do not change this comment) */ |