Mercurial > emacs
annotate src/m/ibms390.h @ 90174:f3973ae57d8b
(unidata-text-file): Delete it.
(unidata-list): Initialize to nil.
(unidata-setup-list): New function.
(unidata-gen-files): New optional arg unidata-text-file. If it's
nil, set unidata-text-file the left command line arg. Call
unidate-setup-list at first.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Wed, 11 May 2005 12:29:25 +0000 |
parents | 68c22ea6027c |
children | f9a65d7ebd29 |
rev | line source |
---|---|
40423
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
1 /* machine description file template. |
44601
4be8406ebef9
Don't define HAVE_ALLOCA, C_ALLOCA and STACK_DIRECTION, now set by autoconf.
Andreas Schwab <schwab@suse.de>
parents:
40423
diff
changeset
|
2 Copyright (C) 1985, 1986, 2001, 2002 Free Software Foundation, Inc. |
40423
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
3 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
4 This file is part of GNU Emacs. |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
5 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
6 GNU Emacs is free software; you can redistribute it and/or modify |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
7 it under the terms of the GNU General Public License as published by |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
8 the Free Software Foundation; either version 2, or (at your option) |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
9 any later version. |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
10 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
11 GNU Emacs is distributed in the hope that it will be useful, |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
12 but WITHOUT ANY WARRANTY; without even the implied warranty of |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
14 GNU General Public License for more details. |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
15 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
16 You should have received a copy of the GNU General Public License |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
17 along with GNU Emacs; see the file COPYING. If not, write to |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
19 Boston, MA 02111-1307, USA. */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
20 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
21 |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
44601
diff
changeset
|
22 /* The following line tells the configuration script what sort of |
40423
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
23 operating system this machine is likely to run. |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
24 USUAL-OPSYS="<name of system .h file here, without the s- or .h>" */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
25 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
26 /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
27 is the most significant byte. */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
28 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
29 #define WORDS_BIG_ENDIAN |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
30 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
31 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
32 * group of arguments and treat it as an array of the arguments. */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
33 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
34 #define NO_ARG_ARRAY |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
35 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
36 /* Define WORD_MACHINE if addresses and such have |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
37 * to be corrected before they can be used as byte counts. */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
38 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
39 #define WORD_MACHINE |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
40 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
41 /* Now define a symbol for the cpu type, if your compiler |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
42 does not define it automatically: |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
43 Ones defined so far include vax, m68000, ns16000, pyramid, |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
44 orion, tahoe, APOLLO and many others */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
45 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
46 #define s390 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
47 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
48 /* Use type int rather than a union, to represent Lisp_Object */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
49 /* This is desirable for most machines. */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
50 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
51 #define NO_UNION_TYPE |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
52 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
53 /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
54 the 24-bit bit field into an int. In other words, if bit fields |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
55 are always unsigned. |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
56 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
57 If you use NO_UNION_TYPE, this flag does not matter. */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
58 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
59 #define EXPLICIT_SIGN_EXTEND |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
60 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
61 /* Data type of load average, as read out of kmem. */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
62 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
63 #define LOAD_AVE_TYPE long |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
64 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
65 /* Convert that into an integer that is 100 for a load average of 1.0 */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
66 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
67 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE) |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
68 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
69 /* Define CANNOT_DUMP on machines where unexec does not work. |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
70 Then the function dump-emacs will not be defined |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
71 and temacs will do (load "loadup") automatically unless told otherwise. */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
72 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
73 /* #define CANNOT_DUMP */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
74 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
75 /* Define VIRT_ADDR_VARIES if the virtual addresses of |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
76 pure and impure space as loaded can vary, and even their |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
77 relative order cannot be relied on. |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
78 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
79 Otherwise Emacs assumes that text space precedes data space, |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
80 numerically. */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
81 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
82 #define VIRT_ADDR_VARIES |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
83 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
84 /* Define NO_REMAP if memory segmentation makes it not work well |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
85 to change the boundary between the text section and data section |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
86 when Emacs is dumped. If you define this, the preloaded Lisp |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
87 code will not be sharable; but that's better than failing completely. */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
88 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
89 /*#define NO_REMAP */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
90 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
91 /* Some really obscure 4.2-based systems (like Sequent DYNIX) |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
92 * do not support asynchronous I/O (using SIGIO) on sockets, |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
93 * even though it works fine on tty's. If you have one of |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
94 * these systems, define the following, and then use it in |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
95 * config.h (or elsewhere) to decide when (not) to use SIGIO. |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
96 * |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
97 * You'd think this would go in an operating-system description file, |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
98 * but since it only occurs on some, but not all, BSD systems, the |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
99 * reasonable place to select for it is in the machine description |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
100 * file. |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
101 */ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
102 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
103 /*#define NO_SOCK_SIGIO*/ |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
104 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
105 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
106 /* After adding support for a new system, modify the large case |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
107 statement in the `configure' script to recognize reasonable |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
108 configuration names, and add a description of the system to |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
109 `etc/MACHINES'. |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
110 |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
111 If you've just fixed a problem in an existing configuration file, |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
112 you should also check `etc/MACHINES' to make sure its descriptions |
95067215a94a
New file. From Adam Thornton <athornton@sinenomine.net>.
Eli Zaretskii <eliz@gnu.org>
parents:
diff
changeset
|
113 of known problems in that configuration should be updated. */ |
89909 | 114 |
115 /* arch-tag: d8a0ffa4-a8f0-4736-90d3-7fd7b21b8314 | |
116 (do not change this comment) */ |