![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to m-convex.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Apple XNU] / GNUtools / emacs / src|
Return to m-convex.h CVS log | Up to [Apple XNU] / GNUtools / emacs / src |
1.1 root 1: /* m- file for convex C1-C3.
2: Copyright (C) 1987, 1989 Free Software Foundation, Inc.
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 1, 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, 675 Mass Ave, Cambridge, MA 02139, USA. */
19:
20:
21: /* The following three symbols give information on
22: the size of various data types. */
23:
24: #define SHORTBITS 16 /* Number of bits in a short */
25:
26: #define INTBITS 32 /* Number of bits in an int */
27:
28: #define LONGBITS 32 /* Number of bits in a long */
29:
30: /* Define BIG_ENDIAN iff lowest-numbered byte in a word
31: is the most significant byte. */
32:
33: #define BIG_ENDIAN
34:
35: /* Define NO_ARG_ARRAY if you cannot take the address of the first of a
36: * group of arguments and treat it as an array of the arguments. */
37:
38: /* #define NO_ARG_ARRAY */
39:
40: /* Define WORD_MACHINE if addresses and such have
41: * to be corrected before they can be used as byte counts. */
42:
43: /* #define WORD_MACHINE */
44:
45: /* Define how to take a char and sign-extend into an int.
46: On machines where char is signed, this is a no-op. */
47:
48: #define SIGN_EXTEND_CHAR(c) (c)
49:
50: /* Now define a symbol for the cpu type, if your compiler
51: does not define it automatically. */
52:
53: /* convex already defined... */
54:
55: /* Use type int rather than a union, to represent Lisp_Object */
56: /* This is desirable for most machines. */
57:
58: #define NO_UNION_TYPE
59:
60: /* crt0.c should use the vax-bsd style of entry, with no dummy args. */
61:
62: #define CRT0_DUMMIES
63:
64: /* crt0.c should define a symbol `start' and do .globl with a dot. */
65:
66: #define DOT_GLOBAL_START
67:
68: /* Data type of load average, as read out of kmem. */
69:
70: #define LOAD_AVE_TYPE double
71:
72: /* Convert that into an integer that is 100 for a load average of 1.0 */
73:
74: #define LOAD_AVE_CVT(x) (int) ((x) * 100.0)
75:
76: /* Define CANNOT_DUMP on machines where unexec does not work.
77: Then the function dump-emacs will not be defined
78: and temacs will do (load "loadup") automatically unless told otherwise. */
79:
80: /* #define CANNOT_DUMP */
81:
82: /* Define VIRT_ADDR_VARIES if the virtual addresses of
83: pure and impure space as loaded can vary, and even their
84: relative order cannot be relied on.
85:
86: Otherwise Emacs assumes that text space precedes data space,
87: numerically. */
88:
89: /* #define VIRT_ADDR_VARIES */
90:
91: /* Define C_ALLOCA if this machine does not support a true alloca
92: and the one written in C should be used instead.
93: Define HAVE_ALLOCA to say that the system provides a properly
94: working alloca function and it should be used.
95: Define neither one if an assembler-language alloca
96: in the file alloca.s should be used. */
97:
98: /* #define C_ALLOCA */
99: #define HAVE_ALLOCA
100:
101: #ifdef __GNUC__
102: #define alloca __builtin_alloca
103: #endif
104:
105: /* Define NO_REMAP if memory segmentation makes it not work well
106: to change the boundary between the text section and data section
107: when Emacs is dumped. If you define this, the preloaded Lisp
108: code will not be sharable; but that's better than failing completely. */
109:
110: /* #define NO_REMAP */
111:
112: /* Addresses on the Convex have the high bit set. */
113:
114: #define DATA_SEG_BITS 0x80000000
115:
116: /* Right shift is logical shift, so use this to sign-extend a lisp int. */
117:
118: #define VSIGNBIT (1 << (VALBITS - 1))
119: #define VALLBITS ((1 << VALBITS) - 1)
120: #define XINT(a) ((int) ((((a) & VALLBITS) ^ VSIGNBIT) - VSIGNBIT))
121:
122: /* Convex uses a special version of unexec. */
123:
124: #define UNEXEC unexconvex.o
125:
126: /* you gotta define 'COFF' for post 6.1 unexec. */
127:
128: #define COFF
129: #define TEXT_START 0x80001000
130:
131: /* Posix stuff for Convex OS 8.1 and up. */
132:
133: #define C_SWITCH_MACHINE -pcc
134: #define LD_SWITCH_MACHINE \
135: -e__start -L /usr/lib \
136: '-A__iob=___ap$$iob' '-A_use_libc_sema=___ap$$use_libc_sema'
137:
138: /* Use setsid when starting up inferiors. */
139: #define HAVE_SETSID
140:
141: /* Use <dirent.h>. */
142: #define SYSV_SYSTEM_DIR
143: #define HAVE_CLOSEDIR
144:
145: #ifdef _POSIX_SOURCE
146:
147: /* These symbols have been undefined to advance the state of the art. */
148:
149: #define S_IFMT _S_IFMT
150: #define S_IFDIR _S_IFDIR
151:
152: #define S_IREAD _S_IREAD
153: #define S_IWRITE _S_IWRITE
154: #define S_IEXEC _S_IEXEC
155:
156: #endif
157:
158: /* Ptys may start below ptyp0; call a routine to hunt for where. */
159:
160: #undef FIRST_PTY_LETTER
161: #define FIRST_PTY_LETTER first_pty_letter()
162:
163: #if 0
164: /*
165: * Force a K&R compilation and libraries with the Convex V 4.0 C compiler
166: */
167: #define C_SWITCH_MACHINE -pcc
168: #define LIB_STANDARD -lc_old
169: #define LIBS_MACHINE -lC2_old
170: #define LD_SWITCH_MACHINE -X -NL -fn -Enoposix -A__iob=___ap\$$iob \
171: -A_use_libc_sema=___ap\$$use_libc_sema -L /usr/lib
172: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.