Mercurial > emacs
annotate src/m/sr2k.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 |
---|---|
16793 | 1 /* machine description file for Hitachi SR2001/SR2201 machines. |
44601
4be8406ebef9
Don't define HAVE_ALLOCA, C_ALLOCA and STACK_DIRECTION, now set by autoconf.
Andreas Schwab <schwab@suse.de>
parents:
16793
diff
changeset
|
2 Copyright (C) 1996, 2002 Free Software Foundation, Inc. |
16793 | 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., 59 Temple Place - Suite 330, | |
19 Boston, MA 02111-1307, USA. */ | |
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 |
16793 | 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. */ | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
48438
diff
changeset
|
64 |
16793 | 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 | |
71 #define XMARKBIT(a) ((a) < 0) | |
72 #define XSETMARKBIT(a,b) ((a) = ((b) ? (a)|MARKBIT : (a) & ~MARKBIT)) | |
73 | |
74 #if 0 /* Loses when sign bit of type field is set. */ | |
75 #define XUNMARK(a) ((a) = (((a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) | |
76 #endif | |
77 | |
78 /* #ifdef __hpux */ | |
79 /* Now define a symbol for the cpu type, if your compiler | |
80 does not define it automatically: | |
81 Ones defined so far include vax, m68000, ns16000, pyramid, | |
82 orion, tahoe, APOLLO and many others */ | |
83 | |
84 #ifndef hp9000s800 | |
85 # define hp9000s800 | |
86 #endif | |
87 | |
88 | |
89 /* Data type of load average, as read out of kmem. */ | |
90 | |
91 #define LOAD_AVE_TYPE double | |
92 | |
93 /* Convert that into an integer that is 100 for a load average of 1.0 */ | |
94 | |
95 #define LOAD_AVE_CVT(x) ((int) (x * 100.0)) | |
96 | |
97 | |
98 /* Define CANNOT_DUMP on machines where unexec does not work. | |
99 Then the function dump-emacs will not be defined | |
100 and temacs will do (load "loadup") automatically unless told otherwise. */ | |
101 | |
102 #undef CANNOT_DUMP | |
103 | |
104 /* Define VIRT_ADDR_VARIES if the virtual addresses of | |
105 pure and impure space as loaded can vary, and even their | |
106 relative order cannot be relied on. | |
107 | |
108 Otherwise Emacs assumes that text space precedes data space, | |
109 numerically. */ | |
110 | |
111 #define VIRT_ADDR_VARIES | |
112 | |
113 /* the data segment on this machine always starts at address 0x40000000. */ | |
114 | |
115 #define DATA_SEG_BITS 0x40000000 | |
116 | |
117 #define DATA_START 0x40000000 | |
118 #define TEXT_START 0x00000000 | |
119 | |
120 /* Define NO_REMAP if memory segmentation makes it not work well | |
121 to change the boundary between the text section and data section | |
122 when Emacs is dumped. If you define this, the preloaded Lisp | |
123 code will not be sharable; but that's better than failing completely. */ | |
124 | |
125 #define NO_REMAP | |
126 | |
127 /* This machine requires completely different unexec code | |
128 which lives in a separate file. Specify the file name. */ | |
129 | |
130 #define UNEXEC unexhp9k800.o | |
131 | |
132 #define LIBS_MACHINE | |
133 #define LIBS_DEBUG | |
134 | |
135 /* Include the file bsdtty.h, since this machine has job control. */ | |
136 /* #define NEED_BSDTTY */ | |
137 | |
138 /* The symbol in the kernel where the load average is found | |
139 is named _avenrun. At this time there are two major flavors | |
140 of hp-ux (there is the s800 and s300 (s200) flavors). The | |
141 differences are thusly moved to the corresponding machine description file. | |
142 */ | |
143 | |
144 /* no underscore please */ | |
145 #define LDAV_SYMBOL "avenrun" | |
146 | |
147 #if 0 /* Supposedly no longer true. */ | |
148 /* In hpux, for unknown reasons, S_IFLNK is defined even though | |
149 symbolic links do not exist. | |
150 Make sure our conditionals based on S_IFLNK are not confused. | |
151 | |
152 Here we assume that stat.h is included before config.h | |
153 so that we can override it here. */ | |
154 | |
155 #undef S_IFLNK | |
156 #endif | |
157 | |
158 /* On USG systems these have different names. */ | |
159 | |
160 #define index strchr | |
161 #define rindex strrchr | |
162 | |
163 /* #endif */ |