![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to m-iris4d.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-iris4d.h CVS log | Up to [Apple XNU] / GNUtools / emacs / src |
1.1 root 1: /* m- file for Iris-4D machines. Use with s-irix3-3.h.
2: Copyright (C) 1987 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: #undef 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) ((signed char)(c))
49:
50: /* Now define a symbol for the cpu type, if your compiler
51: does not define it automatically:
52: Ones defined so far include vax, m68000, ns16000, pyramid,
53: orion, tahoe, APOLLO and many others */
54:
55: #ifndef mips
56: #define mips
57: #endif
58:
59: #ifndef IRIS_4D
60: #define IRIS_4D
61: #endif
62:
63: /* Use type int rather than a union, to represent Lisp_Object */
64: /* This is desirable for most machines. */
65:
66: #define NO_UNION_TYPE
67:
68: /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
69: the 24-bit bit field into an int. In other words, if bit fields
70: are always unsigned.
71:
72: If you use NO_UNION_TYPE, this flag does not matter. */
73:
74: #define EXPLICIT_SIGN_EXTEND
75:
76: /* Data type of load average, as read out of kmem. */
77:
78: #define LOAD_AVE_TYPE long /* This doesn't quite work on the 4D */
79:
80: /* Convert that into an integer that is 100 for a load average of 1.0 */
81:
82: #define LOAD_AVE_CVT(x) (int)(((double)(x)*100)/1024.0)
83:
84: #undef KERNEL_FILE
85: #define KERNEL_FILE "/unix"
86:
87: /* Define CANNOT_DUMP on machines where unexec does not work.
88: Then the function dump-emacs will not be defined
89: and temacs will do (load "loadup") automatically unless told otherwise. */
90:
91: #undef CANNOT_DUMP
92:
93: /* Define VIRT_ADDR_VARIES if the virtual addresses of
94: pure and impure space as loaded can vary, and even their
95: relative order cannot be relied on.
96:
97: Otherwise Emacs assumes that text space precedes data space,
98: numerically. */
99:
100: /* #define VIRT_ADDR_VARIES */
101:
102: /* Define C_ALLOCA if this machine does not support a true alloca
103: and the one written in C should be used instead.
104: Define HAVE_ALLOCA to say that the system provides a properly
105: working alloca function and it should be used.
106: Define neither one if an assembler-language alloca
107: in the file alloca.s should be used. */
108:
109: #define C_ALLOCA
110: /* #define HAVE_ALLOCA */
111:
112: /* Define NO_REMAP if memory segmentation makes it not work well
113: to change the boundary between the text section and data section
114: when Emacs is dumped. If you define this, the preloaded Lisp
115: code will not be sharable; but that's better than failing completely. */
116:
117: #define NO_REMAP
118:
119: /* This machine requires completely different unexec code
120: which lives in a separate file. Specify the file name. */
121:
122: #define UNEXEC unexmips.o
123:
124: #define TEXT_START 0x400000
125:
126: /*
127: * DATA_SEG_BITS forces that bit to be or'd in with any pointers which
128: * are trying to access pure strings (as gnu-emacs only allows 24 bits
129: * for the value field of a LISP_OBJECT).
130: */
131:
132: #define DATA_START 0x10000000
133: #define DATA_SEG_BITS 0x10000000
134:
135: #undef LIBS_MACHINE
136: /* -lsun in case using Yellow Pages for passwords. */
137: #define LIBS_MACHINE -lsun -lmld
138: #define LIBS_DEBUG
139:
140: /* Define this if you have a fairly recent system,
141: in which crt1.o and crt1.n should be used. */
142: #define HAVE_CRTN
143:
144: #ifdef HAVE_CRTN
145: /* Must define START-FILES so that the linker can find /usr/lib/crt0.o. */
146: #define START_FILES pre-crt0.o /usr/lib/crt1.o
147: #define LIB_STANDARD -lbsd -lc /usr/lib/crtn.o
148: #else
149: #define START_FILES pre-crt0.o /usr/lib/crt0.o
150: /* The entry-point label (start of text segment) is `start', not `__start'. */
151: #define DEFAULT_ENTRY_ADDRESS start
152: #define LIB_STANDARD -lbsd -lc
153: #endif
154:
155: /* Use terminfo instead of termcap. */
156:
157: #define TERMINFO
158:
159: /* Letter to use in finding device name of first pty,
160: if system supports pty's. 'a' means it is /dev/ptya0 */
161:
162: #undef FIRST_PTY_LETTER
163: #define FIRST_PTY_LETTER 'q'
164:
165: /* Define STACK_DIRECTION for alloca.c */
166:
167: #define STACK_DIRECTION -1
168:
169: /* The standard definitions of these macros would work ok,
170: but these are faster because the constants are short. */
171:
172: #define XUINT(a) (((unsigned)(a) << (INTBITS-VALBITS)) >> INTBITS-VALBITS)
173:
174: #define XSET(var, type, ptr) \
175: ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << (INTBITS-VALBITS)) >> (INTBITS-VALBITS)))
176:
177: #define XSETINT(a, b) XSET(a, XTYPE(a), b)
178: #define XSETUINT(a, b) XSET(a, XTYPE(a), b)
179: #define XSETPNTR(a, b) XSET(a, XTYPE(a), b)
180:
181: #define XMARKBIT(a) ((a) < 0)
182: #define XSETMARKBIT(a,b) ((a) = ((a) & ~MARKBIT) | ((b) ? MARKBIT : 0))
183: #define XUNMARK(a) ((a) = (((unsigned)(a) << (INTBITS-GCTYPEBITS-VALBITS)) >> (INTBITS-GCTYPEBITS-VALBITS)))
184:
185: #if 0 /* This was a mistake. It is needed only on irix 4.0,
186: but s-irix4-0.h already does it. */
187: /* Turn off some "helpful" error checks for type mismatches
188: that we can't fix without breaking other machines. */
189: #define C_SWITCH_MACHINE -cckr
190: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.