Mercurial > emacs
annotate src/m/alliant-2800.h @ 61403:008bb0675c5b
(readevalloop): Add args START and END as region in
current buffer to read. Callers changed.
When specified, narrow to this region only when reading,
not during eval. Track next point to read from during eval.
Also restore point to "real" buffer position before eval.
(Feval_region): Don't save excursion and restriction here, and
don't narrow to region. Just pass region to readevalloop.
Note: Point is now preserved even when PRINTFLAG is nil.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Fri, 08 Apr 2005 23:33:28 +0000 |
parents | 695cf19ef79e |
children | 23a17af379b1 375f2633d815 |
rev | line source |
---|---|
523 | 1 /* alliant-2800.h - Alliant FX/2800 machine running Concentrix 2800. |
44601
4be8406ebef9
Don't define HAVE_ALLOCA, C_ALLOCA and STACK_DIRECTION, now set by autoconf.
Andreas Schwab <schwab@suse.de>
parents:
14186
diff
changeset
|
2 Copyright (C) 1990, 2002 Free Software Foundation, Inc. |
523 | 3 |
4 This file is part of GNU Emacs. | |
5 | |
3700
d76398601a0b
Update GPL references - version 2
Jim Blandy <jimb@redhat.com>
parents:
750
diff
changeset
|
6 GNU Emacs is free software; you can redistribute it and/or modify |
d76398601a0b
Update GPL references - version 2
Jim Blandy <jimb@redhat.com>
parents:
750
diff
changeset
|
7 it under the terms of the GNU General Public License as published by |
d76398601a0b
Update GPL references - version 2
Jim Blandy <jimb@redhat.com>
parents:
750
diff
changeset
|
8 the Free Software Foundation; either version 2, or (at your option) |
d76398601a0b
Update GPL references - version 2
Jim Blandy <jimb@redhat.com>
parents:
750
diff
changeset
|
9 any later version. |
523 | 10 |
3700
d76398601a0b
Update GPL references - version 2
Jim Blandy <jimb@redhat.com>
parents:
750
diff
changeset
|
11 GNU Emacs is distributed in the hope that it will be useful, |
d76398601a0b
Update GPL references - version 2
Jim Blandy <jimb@redhat.com>
parents:
750
diff
changeset
|
12 but WITHOUT ANY WARRANTY; without even the implied warranty of |
d76398601a0b
Update GPL references - version 2
Jim Blandy <jimb@redhat.com>
parents:
750
diff
changeset
|
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
d76398601a0b
Update GPL references - version 2
Jim Blandy <jimb@redhat.com>
parents:
750
diff
changeset
|
14 GNU General Public License for more details. |
d76398601a0b
Update GPL references - version 2
Jim Blandy <jimb@redhat.com>
parents:
750
diff
changeset
|
15 |
d76398601a0b
Update GPL references - version 2
Jim Blandy <jimb@redhat.com>
parents:
750
diff
changeset
|
16 You should have received a copy of the GNU General Public License |
d76398601a0b
Update GPL references - version 2
Jim Blandy <jimb@redhat.com>
parents:
750
diff
changeset
|
17 along with GNU Emacs; see the file COPYING. If not, write to |
14186
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
13374
diff
changeset
|
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
13374
diff
changeset
|
19 Boston, MA 02111-1307, USA. */ |
523 | 20 |
21 | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
44601
diff
changeset
|
22 /* The following line tells the configuration script what sort of |
523 | 23 operating system this machine is likely to run. |
24 USUAL-OPSYS="bsd4-3" */ | |
25 | |
9095
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
26 /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
27 is the most significant byte. */ |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
28 |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
29 #undef WORDS_BIG_ENDIAN |
23f72b18b420
(WORDS_BIG_ENDIAN): define or undef appropriately, superseding BIG_ENDIAN.
Karl Heuer <kwzh@gnu.org>
parents:
8892
diff
changeset
|
30 |
523 | 31 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a |
32 * group of arguments and treat it as an array of the arguments. */ | |
33 | |
34 #define NO_ARG_ARRAY | |
35 | |
36 /* Define WORD_MACHINE if addresses and such have | |
37 * to be corrected before they can be used as byte counts. */ | |
38 | |
39 #undef WORD_MACHINE | |
40 | |
41 /* Now define a symbol for the cpu type, if your compiler | |
42 does not define it automatically: | |
43 vax, m68000, ns16000, pyramid, orion, tahoe and APOLLO | |
44 are the ones defined so far. */ | |
45 | |
46 #define ALLIANT | |
47 #define ALLIANT_2800 | |
48 #define sun /* Use X support for Sun keyboard stuff. */ | |
49 #define C_OPTIMIZE_SWITCH -Og /* No concurrent code allowed here. */ | |
50 | |
51 /* Use type int rather than a union, to represent Lisp_Object */ | |
52 /* This is desirable for most machines. */ | |
53 | |
54 #define NO_UNION_TYPE | |
55 | |
56 /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend | |
10362
f145d62266f6
(VALBITS, GCTYPEBITS): Deleted; default is better.
Karl Heuer <kwzh@gnu.org>
parents:
9095
diff
changeset
|
57 the bit field into an int. In other words, if bit fields |
523 | 58 are always unsigned. |
59 | |
60 If you use NO_UNION_TYPE, this flag does not matter. */ | |
61 /* On Alliants, bitfields are unsigned. */ | |
62 | |
63 #define EXPLICIT_SIGN_EXTEND | |
64 | |
65 /* Concentrix uses a different kernel symbol for load average. */ | |
66 | |
67 #undef LDAV_SYMBOL /* Undo definition in s-bsd4-2.h */ | |
68 #define LDAV_SYMBOL "_Loadavg" | |
69 | |
70 /* Data type of load average, as read out of kmem. */ | |
71 | |
72 #define LOAD_AVE_TYPE long | |
73 | |
74 /* Convert that into an integer that is 100 for a load average of 1.0 */ | |
75 | |
76 #define LOAD_AVE_CVT(x) (x * 100 / LOADAVG_SCALE) | |
77 | |
78 /* include <sys/param.h> for the definition of LOADAVG_SCALE, and also | |
79 LOADAVG_SIZE, the number of items in the Loadavg array. */ | |
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 | |
85 /* #define CANNOT_DUMP */ | |
86 #define UNEXEC unexfx2800.o | |
87 #define LIBS_MACHINE -lalliant | |
88 | |
89 /* Define VIRT_ADDR_VARIES if the virtual addresses of | |
90 pure and impure space as loaded can vary, and even their | |
91 relative order cannot be relied on. | |
92 | |
93 Otherwise Emacs assumes that text space precedes data space, | |
94 numerically. */ | |
95 | |
96 #undef VIRT_ADDR_VARIES | |
97 | |
98 /* Define NO_REMAP if memory segmentation makes it not work well | |
99 to change the boundary between the text section and data section | |
100 when Emacs is dumped. If you define this, the preloaded Lisp | |
101 code will not be sharable; but that's better than failing completely. */ | |
102 /* Actually, Alliant CONCENTRIX does paging "right": | |
103 data pages are copy-on-write, which means that the pure data areas | |
104 are shared automatically and remapping is not necessary. */ | |
105 | |
106 #define NO_REMAP | |
107 | |
108 /* Alliant needs special crt0.o because system version is not reentrant */ | |
109 | |
110 #define START_FILES crt0.o | |
111 | |
112 /* Alliant dependent code for dumping executing image. | |
113 See crt0.c code for alliant. */ | |
114 | |
115 #define ADJUST_EXEC_HEADER {\ | |
116 extern int _curbrk, _setbrk;\ | |
117 _setbrk = _curbrk;\ | |
118 hdr.a_bss_addr = bss_start;\ | |
119 unexec_text_start = hdr.a_text_addr;} | |
120 | |
121 /* POSIX Compatibility */ | |
122 /* Use System V.4 style getdents/readdir <dirent.h> for 2.2 and up. */ | |
123 #define SYSV_SYSTEM_DIR | |
8632
a049d06857ec
(USE_NONANSI_DEFUN): Defined.
Richard M. Stallman <rms@gnu.org>
parents:
3824
diff
changeset
|
124 |
a049d06857ec
(USE_NONANSI_DEFUN): Defined.
Richard M. Stallman <rms@gnu.org>
parents:
3824
diff
changeset
|
125 /* Use the K&R version of the DEFUN macro. */ |
a049d06857ec
(USE_NONANSI_DEFUN): Defined.
Richard M. Stallman <rms@gnu.org>
parents:
3824
diff
changeset
|
126 #define USE_NONANSI_DEFUN |
52401 | 127 |
128 /* arch-tag: 8ba70b15-d082-40f6-931d-14adfd7f9dbd | |
129 (do not change this comment) */ |