|
|
1.1 root 1: /* m- file for Whitechapel Computer Works MG1 (ns16000 based).
2: Copyright (C) 1985 Free Software Foundation, Inc.
3: MG-1 version by L.M.McLoughlin
4:
5: This file is part of GNU Emacs.
6:
7: GNU Emacs is distributed in the hope that it will be useful,
8: but WITHOUT ANY WARRANTY. No author or distributor
9: accepts responsibility to anyone for the consequences of using it
10: or for whether it serves any particular purpose or works at all,
11: unless he says so in writing. Refer to the GNU Emacs General Public
12: License for full details.
13:
14: Everyone is granted permission to copy, modify and redistribute
15: GNU Emacs, but only under the conditions described in the
16: GNU Emacs General Public License. A copy of this license is
17: supposed to have been given to you along with GNU Emacs so you
18: can know your rights and responsibilities. It should be in a
19: file named COPYING. Among other things, the copyright notice
20: and this notice must be preserved on all copies. */
21:
22:
23: /* The following three symbols give information on
24: the size of various data types. */
25:
26: #define SHORTBITS 16 /* Number of bits in a short */
27:
28: #define INTBITS 32 /* Number of bits in an int */
29:
30: #define LONGBITS 32 /* Number of bits in a long */
31:
32: /* Define BIG_ENDIAN iff lowest-numbered byte in a word
33: is the most significant byte. */
34: /* ns16000 is not big-endian: lowest numbered byte is least significant. */
35: #undef BIG_ENDIAN
36:
37: /* Define NO_ARG_ARRAY if you cannot take the address of the first of a
38: * group of arguments and treat it as an array of the arguments. */
39: /* ns16000 call sequence used on mg1 means that &arg = the args as an array */
40: #undef NO_ARG_ARRAY
41:
42: /* Define WORD_MACHINE if addresses and such have
43: * to be corrected before they can be used as byte counts. */
44: /* ns16000 addresses are byte addresses */
45: #undef WORD_MACHINE
46:
47: /* Define how to take a char and sign-extend into an int.
48: On machines where char is signed, this is a no-op. */
49:
50: #define SIGN_EXTEND_CHAR(c) (c)
51:
52: /* Now define a symbol for the cpu type, if your compiler
53: does not define it automatically:
54: vax, m68000, ns16000, pyramid, orion, tahoe and APOLLO
55: are the ones defined so far. */
56: /* Say this machine is a 16000 and an mg1, cpp says its a 32000 */
57: #define ns16000
58: #define mg1
59:
60: /* Use type int rather than a union, to represent Lisp_Object */
61: /* This is desirable for most machines. */
62: /* Not sure on mg-1 but this shouldn't hurt! */
63: #define NO_UNION_TYPE
64:
65: /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
66: the 24-bit bit field into an int. In other words, if bit fields
67: are always unsigned.
68:
69: If you use NO_UNION_TYPE, this flag does not matter. */
70:
71: #define EXPLICIT_SIGN_EXTEND
72:
73: /* Data type of load average, as read out of kmem. */
74: /* mg1 its an unsigned long */
75: #define LOAD_AVE_TYPE unsigned long
76:
77: /* Convert that into an integer that is 100 for a load average of 1.0 */
78: #define FSCALE 1000.0
79: #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE)
80:
81: /* Define CANNOT_DUMP on machines where unexec does not work.
82: Then the function dump-emacs will not be defined
83: and temacs will do (load "loadup") automatically unless told otherwise. */
84: /* ns16000's have an unexec, so should the mg-1 */
85: #undef CANNOT_DUMP
86:
87: /* Define VIRT_ADDR_VARIES if the virtual addresses of
88: pure and impure space as loaded can vary, and even their
89: relative order cannot be relied on.
90:
91: Otherwise Emacs assumes that text space precedes data space,
92: numerically. */
93: /* hmmmm... not sure. copied m-sequent.h */
94: #undef VIRT_ADDR_VARIES
95:
96: /* Define C_ALLOCA if this machine does not support a true alloca
97: and the one written in C should be used instead.
98: Define HAVE_ALLOCA to say that the system provides a properly
99: working alloca function and it should be used.
100: Define neither one if an assembler-language alloca
101: in the file alloca.s should be used. */
102: /* hmmmm... again not sure. so copied m-sequent.h again! */
103: #undef C_ALLOCA
104: #undef HAVE_ALLOCA
105:
106: /* Define NO_REMAP if memory segmentation makes it not work well
107: to change the boundary between the text section and data section
108: when Emacs is dumped. If you define this, the preloaded Lisp
109: code will not be sharable; but that's better than failing completely. */
110: /* mapping seems screwy */
111: #define NO_REMAP
112:
113: /* Avoids a compiler bug */
114: /* borrowed from m-sequent.h */
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.