(with-selected-window): Add closing paren.
[emacs.git] / src / m / acorn.h
blob38b148b3d2ef6370c592507771ceea30e385b867
1 /* Machine description file for Acorn RISCiX machines.
2 Copyright (C) 1994, 2002 Free Software Foundation, Inc.
4 This file is part of GNU Emacs.
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 2, or (at your option)
9 any later version.
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.
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, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
23 /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word
24 is the most significant byte. */
26 #undef WORDS_BIG_ENDIAN
28 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a
29 * group of arguments and treat it as an array of the arguments. We can't
30 * do this on the arm with gcc, since the first 4 args are in registers. */
32 #ifdef __GNUC__
33 #define NO_ARG_ARRAY
34 #else
35 #undef NO_ARG_ARRAY
36 #endif
38 /* Define WORD_MACHINE if addresses and such have
39 * to be corrected before they can be used as byte counts. */
41 #undef WORD_MACHINE
43 /* Define how to take a char and sign-extend into an int.
44 On machines where char is signed, this is a no-op. */
46 /* ARM note - The RISCiX Norcroft C Compiler has ALL
47 non-32-bit types as unsigned */
49 #define SIGN_EXTEND_CHAR(c) (((int)(c) << 24) >> 24)
51 /* Now define a symbol for the cpu type, if your compiler
52 does not define it automatically:
53 Ones defined so far include vax, m68000, ns16000, pyramid,
54 orion, tahoe, APOLLO and many others */
56 /* ARM note - this is done by the Norcroft compiler - symbol is `__arm' */
58 /* Use type int rather than a union, to represent Lisp_Object */
59 /* This is desirable for most machines. */
61 #define NO_UNION_TYPE
63 /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
64 the 24-bit bit field into an int. In other words, if bit fields
65 are always unsigned.
67 If you use NO_UNION_TYPE, this flag does not matter. */
69 #define EXPLICIT_SIGN_EXTEND
71 #ifdef LDAV_SYMBOL
72 #undef LDAV_SYMBOL
73 #endif
75 #define LDAV_SYMBOL "_iavenrun"
78 /* Data type of load average, as read out of kmem. */
80 #define LOAD_AVE_TYPE long
82 /* Convert that into an integer that is 100 for a load average of 1.0 */
85 * Scale factor for scaled integers used to count
86 * %cpu time and load averages.
89 /* FSHIFT and FSCALE are defined in param.h, but are required by
90 LOAD_AVE_CVT, so they need to be defined here. */
92 #ifndef FSHIFT
93 #define FSHIFT 8 /* bits to right of fixed binary point */
94 #endif
96 #ifndef FSCALE
97 #define FSCALE (1<<FSHIFT)
98 #endif
100 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE)
102 /* Define CANNOT_DUMP on machines where unexec does not work.
103 Then the function dump-emacs will not be defined
104 and temacs will do (load "loadup") automatically unless told otherwise. */
106 #undef CANNOT_DUMP
108 /* Define VIRT_ADDR_VARIES if the virtual addresses of
109 pure and impure space as loaded can vary, and even their
110 relative order cannot be relied on.
112 Otherwise Emacs assumes that text space precedes data space,
113 numerically. */
115 #undef VIRT_ADDR_VARIES
117 /* This prevents Emacs dumping an unsqueezed binary with the
118 SQUEEZE bit set in the magic number. */
120 #define ADJUST_EXEC_HEADER {hdr.a_magic &= ~MF_SQUEEZED;}
122 #ifdef __GNUC__
124 /* Keep gcc/RISCiX happy - it uses __gccmain where other versions of
125 gcc use __main, because of a library routine name clash. */
126 #define __main __gccmain
128 #endif /* __GNUC__ */
130 /* Define NO_REMAP if memory segmentation makes it not work well
131 to change the boundary between the text section and data section
132 when Emacs is dumped. If you define this, the preloaded Lisp
133 code will not be sharable; but that's better than failing completely. */
135 #define NO_REMAP
138 #ifndef NOT_C_CODE
139 #define TEXT_START 0x8000
140 #define DATA_END &_edata
141 extern int _edata;
142 #define etext _etext
143 #endif
145 /* Avoid debugging library */
146 #define LIBS_DEBUG
148 /* Avoid sharing libc */
149 #define LIB_STANDARD -lc_n
151 /* Avoid sharing libX11 */
152 #define LIB_X11_LIB -lX11_n
154 /* All kinds of symbol definitions, so as to avoid multiply defined symbol
155 errors from the RISCiX linker. */
157 #ifdef __GNUC__
158 #define C_DEBUG_SWITCH
160 #define C_OPTIMIZE_SWITCH -O1 -fomit-frame-pointer -w -g -Dgetopt=gnu_getopt -Dopterr=gnu_opterr -Doptind=gnu_optind -Doptarg=gnu_optarg -Dcfree=gnu_cfree -D___type=
162 #else
163 #define C_DEBUG_SWITCH -O -w -g -Dgetopt=gnu_getopt -Dopterr=gnu_opterr -Doptind=gnu_optind -Doptarg=gnu_optarg -Dcfree=gnu_cfree
164 #endif
166 /* Turn this on to avoid the emacs malloc and use standard one */
168 #undef SYSTEM_MALLOC
170 /* Use <dirent.h>. */
171 #define SYSV_SYSTEM_DIR
173 #ifdef NO_REMAP
174 /* CRT0_O is defined in s/riscix1-1.h or s/riscix1-2.h, as appropriate. */
175 #define START_FILES pre-crt0.o CRT0_O
176 #else
177 Cannot
179 this
181 #endif