Mercurial > emacs
annotate src/m/sparc.h @ 4106:bfc21ea9a00f
(read_char_menu_prompt): If the user rejects a menu,
return t. This makes read_char also return t.
(read_key_sequence): If read_char returned t, return -1.
(Fread_key_sequence): If read_key_sequence returned -1, quit.
(command_loop_1): If read_key_sequence returned -1, loop around.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 15 Jul 1993 06:56:17 +0000 |
parents | 0b6fc4c47891 |
children | 87749666b68b |
rev | line source |
---|---|
456 | 1 /* machine description file for Sun 4 SPARC. |
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 | |
3471
0b6fc4c47891
[__GNUC__ >= 2]: Don't include alloca.h.
Richard M. Stallman <rms@gnu.org>
parents:
3390
diff
changeset
|
8 the Free Software Foundation; either version 2, or (at your option) |
456 | 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 /* The following line tells the configuration script what sort of | |
21 operating system this machine is likely to run. | |
22 USUAL-OPSYS="note" | |
23 | |
24 NOTE-START | |
25 Use -opsystem=sunos4 for operating system version 4, and | |
26 -opsystem=bsd4-2 for earlier versions. | |
27 NOTE-END */ | |
28 | |
29 /* The following three symbols give information on | |
30 the size of various data types. */ | |
31 | |
32 #define SHORTBITS 16 /* Number of bits in a short */ | |
33 | |
34 #define INTBITS 32 /* Number of bits in an int */ | |
35 | |
36 #define LONGBITS 32 /* Number of bits in a long */ | |
37 | |
38 /* SPARC has lowest-numbered byte as most significant */ | |
39 | |
40 #define BIG_ENDIAN | |
41 | |
42 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a | |
43 * group of arguments and treat it as an array of the arguments. */ | |
44 | |
45 #define NO_ARG_ARRAY | |
46 | |
47 /* Say this machine is a sparc */ | |
48 | |
49 #ifndef sparc | |
50 #define sparc | |
51 #endif | |
52 | |
53 #ifdef __GNUC__ | |
54 # define C_OPTIMIZE_SWITCH -O | |
55 #else | |
56 /* This level of optimization is reported to work. */ | |
57 # define C_OPTIMIZE_SWITCH -O2 | |
58 #endif | |
59 | |
60 /* Use type int rather than a union, to represent Lisp_Object */ | |
61 | |
62 #define NO_UNION_TYPE | |
63 | |
64 /* XINT must explicitly sign-extend */ | |
65 | |
66 #define EXPLICIT_SIGN_EXTEND | |
67 | |
68 /* Data type of load average, as read out of kmem. */ | |
69 | |
70 #define LOAD_AVE_TYPE long | |
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) (((double) (x)) * 100.0 / FSCALE) | |
75 | |
76 /* Define C_ALLOCA if this machine does not support a true alloca | |
77 and the one written in C should be used instead. | |
78 Define HAVE_ALLOCA to say that the system provides a properly | |
79 working alloca function and it should be used. | |
80 Define neither one if an assembler-language alloca | |
81 in the file alloca.s should be used. */ | |
82 | |
83 #define HAVE_ALLOCA | |
3471
0b6fc4c47891
[__GNUC__ >= 2]: Don't include alloca.h.
Richard M. Stallman <rms@gnu.org>
parents:
3390
diff
changeset
|
84 #if __GNUC__ < 2 /* Modern versions of GCC handle alloca directly. */ |
456 | 85 #include <alloca.h> |
3390
ce971b0a5918
[__GNUC__ >= 2]: Don't include alloca.h.
Richard M. Stallman <rms@gnu.org>
parents:
1815
diff
changeset
|
86 #endif |
456 | 87 |
1815
2f2848511175
[TERMINFO]: Don't define LIBS_TERMCAP.
Richard M. Stallman <rms@gnu.org>
parents:
1632
diff
changeset
|
88 /* Must use the system's termcap, if we use any termcap. |
2f2848511175
[TERMINFO]: Don't define LIBS_TERMCAP.
Richard M. Stallman <rms@gnu.org>
parents:
1632
diff
changeset
|
89 It does special things. */ |
456 | 90 |
1815
2f2848511175
[TERMINFO]: Don't define LIBS_TERMCAP.
Richard M. Stallman <rms@gnu.org>
parents:
1632
diff
changeset
|
91 #ifndef TERMINFO |
456 | 92 #define LIBS_TERMCAP -ltermcap |
1815
2f2848511175
[TERMINFO]: Don't define LIBS_TERMCAP.
Richard M. Stallman <rms@gnu.org>
parents:
1632
diff
changeset
|
93 #endif |
456 | 94 |
95 /* Mask for address bits within a memory segment */ | |
96 | |
97 #define SEGMENT_MASK (SEGSIZ - 1) | |
98 | |
99 /* Arrange to link with sun windows, if requested. */ | |
100 /* For details on emacstool and sunfns, see etc/SUN-SUPPORT */ | |
101 /* These programs require Sun UNIX 4.2 Release 3.2 or greater */ | |
102 | |
103 #ifdef HAVE_SUN_WINDOWS | |
104 #define OTHER_FILES ${etcdir}emacstool | |
105 #define LIBS_MACHINE -lsuntool -lsunwindow -lpixrect | |
106 #define OBJECTS_MACHINE sunfns.o | |
107 #define SYMS_MACHINE syms_of_sunfns () | |
108 #define PURESIZE 130000 | |
109 #endif | |
110 | |
111 /* Say that the text segment of a.out includes the header; | |
112 the header actually occupies the first few bytes of the text segment | |
113 and is counted in hdr.a_text. */ | |
114 | |
115 #define A_TEXT_OFFSET(HDR) sizeof (HDR) | |
116 | |
117 /* This is the offset of the executable's text, from the start of the file. */ | |
118 | |
119 #define A_TEXT_SEEK(HDR) (N_TXTOFF (hdr) + sizeof (hdr)) |