annotate src/m/gould.h @ 340:497cb5bff1c4 xemacs-21-0

Added tag r21-0-67 for changeset 336b97f03633
author cvs
date Mon, 13 Aug 2007 10:51:28 +0200
parents c42ec1d1cded
children a86b2b5e0111
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1 /* machine description file for Gould PowerNodes with UTX/32 2.0 and 2.1.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
2 (See MACHINES for older versions.)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
3
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
4 * NOTE: If you are running a pre-release of UTX/32 2.1 you should #define
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
5 * RELEASE2_1 in config.h. This may also be necessary with un-updated
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
6 * official releases of 2.1
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
7
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
8 Copyright (C) 1986 Free Software Foundation, Inc.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
9
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
10 This file is part of GNU Emacs.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
11
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
12 GNU Emacs is free software; you can redistribute it and/or modify
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
13 it under the terms of the GNU General Public License as published by
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
14 the Free Software Foundation; either version 2, or (at your option)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
15 any later version.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
16
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
17 GNU Emacs is distributed in the hope that it will be useful,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
20 GNU General Public License for more details.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
21
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
22 You should have received a copy of the GNU General Public License
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
23 along with XEmacs; see the file COPYING. If not, write to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
24 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
25 Boston, MA 02111-1307, USA. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
26
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
27 /* Synched up with: FSF 19.31. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
28
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
29 /* The following line tells the configuration script what sort of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
30 operating system this machine is likely to run.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
31 USUAL-OPSYS="note"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
32
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
33 NOTE-START
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
34 Gould Power Node (-machine=gould -opsystem=bsd4-2 or bsd4-3)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
35 (gould.h; s-bsd4-2.h or s-bsd4-3.h)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
36
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
37 18.36 worked on versions 1.2 and 2.0 of the operating system.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
38
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
39 On UTX/32 2.0, use -opsystem=bsd4-3
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
40
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
41 On UTX/32 1.2 and UTX/32S 1.0, use -opsystem=bsd4-2 and note that compiling
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
42 lib-src/sorted-doc tickles a compiler bug: remove the -g flag to cc in the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
43 makefile.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
44
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
45 Version 19 incorporates support for releases 2.1 and later of UTX/32.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
46 A site running a pre-release of 2.1 should #define RELEASE2_1 in config.h.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
47 NOTE-END */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
48
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
49 /* Define WORD_MACHINE if addresses and such have
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
50 * to be corrected before they can be used as byte counts. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
51
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
52 /* #define WORD_MACHINE */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
53
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
54 /* Now define a symbol for the cpu type, if your compiler
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
55 does not define it automatically */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
56
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
57 #ifndef GOULD
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
58 #define GOULD
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
59 #endif
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
60
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
61 /* sel is an old preprocessor name on gould machines
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
62 - it is no longer needed and interferes with a variable in xmenu.c */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
63 #undef sel
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
64
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
65 /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
66 the bit field into an int. In other words, if bit fields
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
67 are always unsigned.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
68
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
69 If you use NO_UNION_TYPE, this flag does not matter. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
70
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
71 #define EXPLICIT_SIGN_EXTEND
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
72
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
73 /* Data type of load average, as read out of kmem. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
74
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
75 #define LOAD_AVE_TYPE double
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
76
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
77 /* Convert that into an integer that is 100 for a load average of 1.0 */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
78
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
79 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
80
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
81 /* Define CANNOT_DUMP on machines where unexec does not work.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
82 Then the function dump-emacs will not be defined
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
83 and temacs will do (load "loadup") automatically unless told otherwise. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
84
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
85 /* #define CANNOT_DUMP */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
86
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
87 /* Define VIRT_ADDR_VARIES if the virtual addresses of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
88 pure and impure space as loaded can vary, and even their
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
89 relative order cannot be relied on.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
90
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
91 Otherwise Emacs assumes that text space precedes data space,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
92 numerically. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
93
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
94 #define VIRT_ADDR_VARIES
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
95
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
96 /* Define C_ALLOCA if this machine does not support a true alloca
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
97 and the one written in C should be used instead.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
98 Define HAVE_ALLOCA to say that the system provides a properly
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
99 working alloca function and it should be used.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
100 Define neither one if an assembler-language alloca
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
101 in the file alloca.s should be used. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
102
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
103 #define C_ALLOCA
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
104 #define STACK_DIRECTION -1 /* grows towards lower addresses on Gould UTX/32 */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
105
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
106 /* No need to extend the user stack. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
107
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
108 /* If this is a 2.1 system, COFF will be predefined by cpp. If it's */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
109 /* pre-2.1 COFF won't be defined, which is as it should be. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
110
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
111 #ifdef COFF
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
112
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
113 #define HEADER_INCL_IN_TEXT
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
114 #define COFF_BSD_SYMBOLS
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
115
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
116 /* Seems to be necessary with coff */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
117 #define NO_REMAP
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
118
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
119 #ifndef GOULD_NP1
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
120 /* gould-np1.h includes this file */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
121 /* keep the old value - don't skip over the headers */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
122 #define KEEP_OLD_TEXT_SCNPTR
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
123 #define KEEP_OLD_PADDR
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
124 #ifndef RELEASE2_1
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
125 #define ADJUST_TEXTBASE
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
126 #endif /*RELEASE2_1*/
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
127 #endif /* GOULD_NP1 */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
128
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
129 #ifdef IN_UNEXEC
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
130 /* make Gould NP and PN COFF look like USG COFF */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
131 /* PN COFF */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
132 #define aouthdr old_exec
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
133 /* PN COFF doesn't have a data_start or a_dtbase field in its */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
134 /* optional header, so substitute a junk field */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
135 #define a_dtbase a_ccvers
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
136 /* Gould COFF */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
137 #define magic a_magic
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
138 #define tsize a_text
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
139 #define dsize a_data
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
140 #define bsize a_bss
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
141 #define entry a_entry
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
142 #define text_start a_txbase
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
143 #define data_start a_dtbase
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
144 #endif /* IN_UNEXEC */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
145
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
146 /* Define how to search all pty names.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
147 * This is for UTX 2.1 and greater on PN and all NP versions. It is only
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
148 * accident that this happens to correspond to the same versions of UTX
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
149 * as COFF does, but we'll take advantage of that here.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
150 */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
151
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
152 /*#define USE_PTY_PAIR*/
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
153
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
154 #endif /* COFF */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
155
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
156 /* -g is sometimes broken on the Gould. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
157
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
158 #define C_DEBUG_SWITCH
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
159
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
160 /* The GOULD machine counts the a.out file header as part of the text. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
161
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
162 #define A_TEXT_OFFSET(HDR) sizeof (HDR)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
163
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
164 /* Machine-dependent action when about to dump an executable file. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
165
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
166 #ifndef COFF
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
167 #define ADJUST_EXEC_HEADER \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
168 unexec_text_start = hdr.a_txbase + sizeof (hdr);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
169 #endif
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
170
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
171 /* We use the system's crt0.o. Somehow it avoids losing
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
172 with `environ' the way most standard crt0.o's do. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
173
163
0132846995bd Import from CVS: tag r20-3b8
cvs
parents: 0
diff changeset
174 #define START_FILES "pre-crt0.o /lib/crt0.o"