annotate src/m/convex.h @ 398:74fd4e045ea6 r21-2-29

Import from CVS: tag r21-2-29
author cvs
date Mon, 13 Aug 2007 11:13:30 +0200
parents 85ec50267440
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 Convex (all models).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
2 Copyright (C) 1987, 1994 Free Software Foundation, Inc.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
3
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
4 This file is part of GNU Emacs.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
5
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
6 GNU Emacs is free software; you can redistribute it and/or modify
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
7 it under the terms of the GNU General Public License as published by
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
8 the Free Software Foundation; either version 2, or (at your option)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
9 any later version.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
10
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
11 GNU Emacs is distributed in the hope that it will be useful,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
14 GNU General Public License for more details.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
15
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
16 You should have received a copy of the GNU General Public License
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
17 along with XEmacs; see the file COPYING. If not, write to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
19 Boston, MA 02111-1307, USA. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
20
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
21 /* Synched up with: FSF 19.31. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
22
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
23 /* The following line tells the configuration script what sort of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
24 operating system this machine is likely to run.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
25 USUAL-OPSYS="bsd4-3" */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
26
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
27 /* Define WORD_MACHINE if addresses and such have
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
28 * to be corrected before they can be used as byte counts. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
29
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
30 /* #define WORD_MACHINE */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
31
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
32 /* Now define a symbol for the cpu type, if your compiler
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
33 does not define it automatically. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
34 #ifndef convex /* The compiler doesn't always do this. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
35 #define convex
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
36 #endif
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
37
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
38 #ifndef __GNUC__ /* David M. Cooke <dcooke@haven.larc.nasa.gov>
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
39 and Ralph Sobek <Ralph.Sobek@cerfacs.fr> agree
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
40 must ignore one arg when compiled with convex compiler. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
41 #define CRT0_DUMMIES ignore,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
42 #else
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
43 #define CRT0_DUMMIES
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
44 #endif
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
45
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
46 /* crt0.c should define a symbol `start' and do .globl with a dot. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
47
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
48 #define DOT_GLOBAL_START
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
49
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
50 /* Data type of load average, as read out of kmem. */
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 LOAD_AVE_TYPE double
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
53
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
54 /* 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
55
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
56 #define LOAD_AVE_CVT(x) (int) ((x) * 100.0)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
57
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
58 /* Define CANNOT_DUMP on machines where unexec does not work.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
59 Then the function dump-emacs will not be defined
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
60 and temacs will do (load "loadup") automatically unless told otherwise. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
61
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
62 /* #define CANNOT_DUMP */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
63
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
64 /* Define VIRT_ADDR_VARIES if the virtual addresses of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
65 pure and impure space as loaded can vary, and even their
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
66 relative order cannot be relied on.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
67
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
68 Otherwise Emacs assumes that text space precedes data space,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
69 numerically. */
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 VIRT_ADDR_VARIES*/
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
72
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
73 /* Define C_ALLOCA if this machine does not support a true alloca
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
74 and the one written in C should be used instead.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
75 Define HAVE_ALLOCA to say that the system provides a properly
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
76 working alloca function and it should be used.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
77 Define neither one if an assembler-language alloca
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
78 in the file alloca.s should be used. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
79
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
80 /* #define C_ALLOCA */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
81 #define HAVE_ALLOCA
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
82
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
83 /* Must use the system's termcap. It does special things. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
84
163
0132846995bd Import from CVS: tag r20-3b8
cvs
parents: 0
diff changeset
85 #define LIBS_TERMCAP "-ltermcap"
0
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 NO_REMAP if memory segmentation makes it not work well
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
88 to change the boundary between the text section and data section
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
89 when Emacs is dumped. If you define this, the preloaded Lisp
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
90 code will not be sharable; but that's better than failing completely. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
91
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
92 /* #define NO_REMAP */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
93
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
94 /* Addresses on the Convex have the high bit set. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
95 #define DATA_SEG_BITS (1 << (INTBITS-1))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
96
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
97 /* Right shift is logical shift.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
98 And the usual way of handling such machines, which involves
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
99 copying the number into sign_extend_temp, does not work
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
100 for reasons as yet unknown. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
101
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
102 #define XREALINT(a) sign_extend_lisp_int (a)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
103
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
104 /* Convex uses a special version of unexec. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
105
163
0132846995bd Import from CVS: tag r20-3b8
cvs
parents: 0
diff changeset
106 #define UNEXEC "unexconvex.o"
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
107
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
108 /* you gotta define 'COFF' for post 6.1 unexec. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
109
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
110 #define COFF
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
111 #define TEXT_START 0x80001000
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
112
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
113 /* Posix stuff for Convex OS 8.1 and up. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
114
163
0132846995bd Import from CVS: tag r20-3b8
cvs
parents: 0
diff changeset
115 #define LD_SWITCH_MACHINE "-e__start -L /usr/lib '-A__iob=___ap$$iob' '-A_use_libc_sema=___ap$$use_libc_sema'"
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
116
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
117 #ifdef _POSIX_SOURCE
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
118
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
119 /* These symbols have been undefined to advance the state of the art. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
120
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
121 #define S_IFMT _S_IFMT
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
122 #define S_IFDIR _S_IFDIR
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
123
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
124 #define S_IREAD _S_IREAD
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
125 #define S_IWRITE _S_IWRITE
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
126 #define S_IEXEC _S_IEXEC
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
127
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
128 #endif
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
129
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
130 /* Ptys may start below ptyp0; call a routine to hunt for where. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
131
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
132 #undef FIRST_PTY_LETTER
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
133 #define FIRST_PTY_LETTER first_pty_letter()
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
134
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
135 #if 0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
136 /*
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
137 * Force a K&R compilation and libraries with the Convex V 4.0 C compiler
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
138 */
163
0132846995bd Import from CVS: tag r20-3b8
cvs
parents: 0
diff changeset
139 #define C_SWITCH_MACHINE "-pcc"
0132846995bd Import from CVS: tag r20-3b8
cvs
parents: 0
diff changeset
140 #define LIB_STANDARD "-lc_old"
0132846995bd Import from CVS: tag r20-3b8
cvs
parents: 0
diff changeset
141 #define LIBS_MACHINE "-lC2_old"
0132846995bd Import from CVS: tag r20-3b8
cvs
parents: 0
diff changeset
142 #define LD_SWITCH_MACHINE "-X -NL -fn -Enoposix -A__iob=___ap\$$iob -A_use_libc_sema=___ap\$$use_libc_sema -L /usr/lib"
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
143 #endif
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
144
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
145 /* Avoid error in xrdb.c - d.m.cooke@larc.nasa.gov. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
146 #define DECLARE_GETPWUID_WITH_UID_T
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
147
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
148 /* Tested for both Convex C and GNUC by d.m.cooke@larc.nasa.gov. */
163
0132846995bd Import from CVS: tag r20-3b8
cvs
parents: 0
diff changeset
149 #define LIBS_MACHINE "-lC2"
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
150
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
151 /* Avoid error in getloadavg.c. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
152 #define NLIST_NAME_UNION 1
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
153
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
154 #if 0 /* This is supposed to be an improvement.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
155 It would be good for people to try enabling this code
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
156 and report the results. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
157 /* gcc -nostdlib prevents some math symbols from being included.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
158 So we have to use -nostartfiles instead. */
163
0132846995bd Import from CVS: tag r20-3b8
cvs
parents: 0
diff changeset
159 #define LINKER "$(CC) -nostartfiles"
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
160
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
161 #define ORDINARY_LINK
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
162
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
163 #undef LD_SWITCH_MACHINE
163
0132846995bd Import from CVS: tag r20-3b8
cvs
parents: 0
diff changeset
164 #define LD_SWITCH_MACHINE "-L /usr/lib '-A__iob=___ap$$iob' '-A_use_libc_sema=___ap$$use_libc_sema'"
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
165 #endif