Mercurial > emacs
annotate src/m/ibms390x.h @ 84580:4968c5b03197
*** empty log message ***
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Sat, 15 Sep 2007 20:45:41 +0000 |
parents | 9b1538c8f40d |
children | 1889b9f9238e |
rev | line source |
---|---|
68888 | 1 /* machine description file for IBM S390 in 64-bit mode |
75348 | 2 Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007 Free Software Foundation, Inc. |
68888 | 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 | |
78258
6aba169c4b1f
Switch license to GPLv3 or later.
Glenn Morris <rgm@gnu.org>
parents:
75348
diff
changeset
|
8 the Free Software Foundation; either version 3, or (at your option) |
68888 | 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 /* This file was made by copying the significant parts of amdx86-64.h | |
22 into ibms390.h. */ | |
23 | |
24 | |
84485
9b1538c8f40d
(C_ALLOCA): Remove references to this.
Glenn Morris <rgm@gnu.org>
parents:
78499
diff
changeset
|
25 /* The following line tells the configuration script what sort of |
68888 | 26 operating system this machine is likely to run. |
27 USUAL-OPSYS="<name of system .h file here, without the s- or .h>" | |
28 | |
29 NOTE-START | |
30 IBM s390 64 bits (-machine=ibms390x64) | |
31 | |
32 The possibilities for -opsystem are: gnu-linux. | |
33 | |
34 NOTE-END */ | |
35 | |
36 #define BITS_PER_LONG 64 | |
37 #define BITS_PER_EMACS_INT 64 | |
38 | |
78499 | 39 /* Define WORDS_BIG_ENDIAN if lowest-numbered byte in a word |
68888 | 40 is the most significant byte. */ |
41 | |
42 #define WORDS_BIG_ENDIAN | |
43 | |
44 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a | |
45 * group of arguments and treat it as an array of the arguments. */ | |
46 | |
47 #define NO_ARG_ARRAY | |
48 | |
49 /* Define WORD_MACHINE if addresses and such have | |
50 * to be corrected before they can be used as byte counts. */ | |
51 | |
52 #define WORD_MACHINE | |
53 | |
54 /* Now define a symbol for the cpu type, if your compiler | |
55 does not define it automatically: | |
56 Ones defined so far include vax, m68000, ns16000, pyramid, | |
57 orion, tahoe, APOLLO and many others */ | |
58 | |
59 /* Use type int rather than a union, to represent Lisp_Object */ | |
60 /* This is desirable for most machines. */ | |
61 | |
62 #define NO_UNION_TYPE | |
63 | |
64 /* Define the type to use. */ | |
65 #define EMACS_INT long | |
66 #define EMACS_UINT unsigned long | |
67 #define SPECIAL_EMACS_INT | |
68 | |
69 /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend | |
70 the 24-bit bit field into an int. In other words, if bit fields | |
71 are always unsigned. | |
72 | |
73 If you use NO_UNION_TYPE, this flag does not matter. */ | |
74 | |
75 #undef EXPLICIT_SIGN_EXTEND | |
76 | |
77 /* Data type of load average, as read out of kmem. */ | |
78 | |
79 #define LOAD_AVE_TYPE long | |
80 | |
81 /* Convert that into an integer that is 100 for a load average of 1.0 */ | |
82 | |
83 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE) | |
84 | |
85 /* Define CANNOT_DUMP on machines where unexec does not work. | |
86 Then the function dump-emacs will not be defined | |
87 and temacs will do (load "loadup") automatically unless told otherwise. */ | |
88 | |
89 #undef CANNOT_DUMP | |
90 | |
91 /* Define VIRT_ADDR_VARIES if the virtual addresses of | |
92 pure and impure space as loaded can vary, and even their | |
93 relative order cannot be relied on. | |
94 | |
95 Otherwise Emacs assumes that text space precedes data space, | |
96 numerically. */ | |
97 | |
98 #define VIRT_ADDR_VARIES | |
99 | |
84485
9b1538c8f40d
(C_ALLOCA): Remove references to this.
Glenn Morris <rgm@gnu.org>
parents:
78499
diff
changeset
|
100 /* Define HAVE_ALLOCA to say that the system provides a properly |
9b1538c8f40d
(C_ALLOCA): Remove references to this.
Glenn Morris <rgm@gnu.org>
parents:
78499
diff
changeset
|
101 working alloca function and it should be used. Undefine it if an |
9b1538c8f40d
(C_ALLOCA): Remove references to this.
Glenn Morris <rgm@gnu.org>
parents:
78499
diff
changeset
|
102 assembler-language alloca in the file alloca.s should be used. */ |
68888 | 103 |
104 #define HAVE_ALLOCA | |
105 | |
106 /* Define NO_REMAP if memory segmentation makes it not work well | |
107 to change the boundary between the text section and data section | |
108 when Emacs is dumped. If you define this, the preloaded Lisp | |
109 code will not be sharable; but that's better than failing completely. */ | |
110 | |
111 #undef NO_REMAP | |
112 | |
113 /* Some really obscure 4.2-based systems (like Sequent DYNIX) | |
114 * do not support asynchronous I/O (using SIGIO) on sockets, | |
115 * even though it works fine on tty's. If you have one of | |
116 * these systems, define the following, and then use it in | |
117 * config.h (or elsewhere) to decide when (not) to use SIGIO. | |
118 * | |
119 * You'd think this would go in an operating-system description file, | |
120 * but since it only occurs on some, but not all, BSD systems, the | |
121 * reasonable place to select for it is in the machine description | |
122 * file. | |
123 */ | |
124 | |
125 #undef NO_SOCK_SIGIO | |
126 | |
127 | |
128 /* After adding support for a new system, modify the large case | |
129 statement in the `configure' script to recognize reasonable | |
130 configuration names, and add a description of the system to | |
131 `etc/MACHINES'. | |
132 | |
133 If you've just fixed a problem in an existing configuration file, | |
134 you should also check `etc/MACHINES' to make sure its descriptions | |
135 of known problems in that configuration should be updated. */ | |
136 | |
137 #define PNTR_COMPARISON_TYPE unsigned long | |
138 | |
139 /* On the 64 bit architecture, we can use 60 bits for addresses */ | |
140 | |
141 #define VALBITS 60 | |
142 | |
143 /* This definition of MARKBIT is necessary because of the comparison of | |
144 ARRAY_MARK_FLAG and MARKBIT in an #if in lisp.h, which cpp doesn't like. */ | |
145 | |
146 #define MARKBIT 0x8000000000000000L | |
147 | |
148 #define LINKER $(CC) -nostdlib | |
149 | |
150 /* Define XINT and XUINT so that they can take arguments of type int */ | |
151 #define XINT(a) (((long) (a) << (BITS_PER_LONG - VALBITS)) >> (BITS_PER_LONG - VALBITS)) | |
152 #define XUINT(a) ((long) (a) & VALMASK) | |
153 | |
154 /* Define XPNTR to avoid or'ing with DATA_SEG_BITS */ | |
155 | |
156 #define XPNTR(a) XUINT (a) | |
68901 | 157 |
72690
21e7b41532bb
(START_FILES, LIB_STANDARD): Override to
Andreas Schwab <schwab@suse.de>
parents:
68901
diff
changeset
|
158 #undef START_FILES |
21e7b41532bb
(START_FILES, LIB_STANDARD): Override to
Andreas Schwab <schwab@suse.de>
parents:
68901
diff
changeset
|
159 #define START_FILES pre-crt0.o /usr/lib64/crt1.o /usr/lib64/crti.o |
21e7b41532bb
(START_FILES, LIB_STANDARD): Override to
Andreas Schwab <schwab@suse.de>
parents:
68901
diff
changeset
|
160 |
21e7b41532bb
(START_FILES, LIB_STANDARD): Override to
Andreas Schwab <schwab@suse.de>
parents:
68901
diff
changeset
|
161 #undef LIB_STANDARD |
21e7b41532bb
(START_FILES, LIB_STANDARD): Override to
Andreas Schwab <schwab@suse.de>
parents:
68901
diff
changeset
|
162 #define LIB_STANDARD -lgcc -lc -lgcc /usr/lib64/crtn.o |
21e7b41532bb
(START_FILES, LIB_STANDARD): Override to
Andreas Schwab <schwab@suse.de>
parents:
68901
diff
changeset
|
163 |
68901 | 164 /* arch-tag: 4b87653c-6add-4663-8691-7d9dc17b5519 |
165 (do not change this comment) */ |