Mercurial > emacs
annotate src/s/rtu.h @ 11237:7c968b691ff0
(frame_vector): New static variable.
(syms_of_xmenu): staticpro it.
(frame_vector_add_frame): New function.
(set_frame_menubar): Use frame_vector; use index as the widget id.
(free_frame_menubar): Likewise. Remove the frame from frame_vector.
(menubar_selection_callback): Use frame_vector to turn id into frame.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Fri, 07 Apr 1995 03:39:07 +0000 |
parents | 191acacfa1ec |
children | ee40177f6c68 |
rev | line source |
---|---|
456 | 1 /* Definitions file for GNU Emacs running on RTU 3.0, ucb universe. |
2 Copyright (C) 1986 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 | |
3699 | 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 | |
21 /* | |
22 * Define symbols to identify the version of Unix this is. | |
23 * Define all the symbols that apply correctly. | |
24 */ | |
25 | |
26 #define BSD4_2 | |
27 #define BSD | |
28 #define RTU | |
29 | |
30 /* SYSTEM_TYPE should indicate the kind of system you are using. | |
31 It sets the Lisp variable system-type. */ | |
32 | |
33 #define SYSTEM_TYPE "rtu" | |
34 | |
35 /* NOMULTIPLEJOBS should be defined if your system's shell | |
36 does not have "job control" (the ability to stop a program, | |
37 run some other program, then continue the first one). */ | |
38 | |
39 #define NOMULTIPLEJOBS | |
40 | |
41 /* Emacs can read input using SIGIO and buffering characters itself, | |
42 or using CBREAK mode and making C-g cause SIGINT. | |
43 The choice is controlled by the variable interrupt_input. | |
44 Define INTERRUPT_INPUT to make interrupt_input = 1 the default (use SIGIO) | |
45 | |
46 SIGIO can be used only on systems that implement it (4.2 and 4.3). | |
3591
507f64624555
Apply typo patches from Paul Eggert.
Jim Blandy <jimb@redhat.com>
parents:
620
diff
changeset
|
47 CBREAK mode has two disadvantages |
456 | 48 1) At least in 4.2, it is impossible to handle the Meta key properly. |
49 I hear that in system V this problem does not exist. | |
50 2) Control-G causes output to be discarded. | |
51 I do not know whether this can be fixed in system V. | |
52 | |
53 Another method of doing input is planned but not implemented. | |
54 It would have Emacs fork off a separate process | |
55 to read the input and send it to the true Emacs process | |
56 through a pipe. | |
57 */ | |
58 | |
59 #undef INTERRUPT_INPUT | |
60 | |
61 /* Letter to use in finding device name of first pty, | |
62 if system supports pty's. 'a' means it is /dev/ptya0 */ | |
63 | |
64 #define FIRST_PTY_LETTER 'z' /* i.e. no PTY_LETTERs */ | |
65 | |
66 /* | |
67 * Define HAVE_PTYS if the system supports pty devices. | |
68 */ | |
69 | |
70 #define HAVE_PTYS | |
71 | |
72 /* Define this macro if system defines a type `union wait'. */ | |
73 | |
74 #define HAVE_UNION_WAIT | |
75 | |
76 /* Define HAVE_SOCKETS if system supports 4.2-compatible sockets. */ | |
77 | |
78 #define HAVE_SOCKETS | |
79 | |
80 /* | |
81 * Define NONSYSTEM_DIR_LIBRARY to make Emacs emulate | |
82 * The 4.2 opendir, etc., library functions. | |
83 */ | |
84 | |
85 #define NONSYSTEM_DIR_LIBRARY | |
86 | |
87 /* Define this symbol if your system has the functions bcopy, etc. */ | |
88 /* The system library bcopy() is broken in RTU. For one thing, it expects | |
89 the length to be less than 64k. */ | |
90 #undef BSTRING | |
91 | |
92 /* subprocesses should be defined if you want to | |
93 have code for asynchronous subprocesses | |
94 (as used in M-x compile and M-x shell). | |
95 This is generally OS dependent, and not supported | |
96 under most USG systems. */ | |
97 | |
98 #define subprocesses | |
99 | |
100 /* If your system uses COFF (Common Object File Format) then define the | |
101 preprocessor symbol "COFF". */ | |
102 | |
103 #undef COFF | |
104 | |
105 /* define MAIL_USE_FLOCK if the mailer uses flock | |
106 to interlock access to /usr/spool/mail/$USER. | |
107 The alternative is that a lock file named | |
108 /usr/spool/mail/$USER.lock. */ | |
109 | |
110 #undef MAIL_USE_FLOCK | |
111 | |
112 /* Define CLASH_DETECTION if you want lock files to be written | |
113 so that Emacs can tell instantly when you try to modify | |
114 a file that someone else has modified in his Emacs. */ | |
115 | |
116 #undef CLASH_DETECTION | |
117 | |
118 /* We use the Berkeley (and usg5.2.2) interface to nlist. */ | |
119 | |
120 #define NLIST_STRUCT | |
121 | |
122 /* The symbol in the kernel where the load average is found | |
123 is named _avenrun. */ | |
124 | |
125 #define LDAV_SYMBOL "_avenrun" | |
126 | |
127 /* Special hacks needed to make Emacs run on this system. */ | |
128 | |
3591
507f64624555
Apply typo patches from Paul Eggert.
Jim Blandy <jimb@redhat.com>
parents:
620
diff
changeset
|
129 /* On RTU systems (like USG) the system calls are interruptible by signals |
456 | 130 that the user program has elected to catch. Thus the system call |
131 must be retried in these cases. To handle this without massive | |
132 changes in the source code, we remap the standard system call names | |
133 to names for our own functions in sysdep.c that do the system call | |
134 with retries. */ | |
135 | |
136 #define read sys_read | |
137 #define open sys_open | |
138 #define write sys_write | |
139 | |
140 #define INTERRUPTIBLE_OPEN | |
141 #define INTERRUPTIBLE_IO | |
142 | |
143 /* The "fsync" call on RTU versions 3.0 and 3.1 is badly broken! | |
144 This hack below isn't the best solution, but without it this | |
145 program will cause the whole system to hang! !@#$#%$ Masscomp! */ | |
146 | |
147 #define fsync(x) 0 /* "Comment out" fsync calls */ | |
148 | |
149 /* RTU has IPC instead of Unix-domain sockets. */ | |
150 | |
151 #define HAVE_SYSVIPC | |
152 | |
153 /* This is how to get the device name of the tty end of a pty. */ | |
154 #define PTY_TTY_NAME_SPRINTF \ | |
620 | 155 sprintf (pty_name, "/dev/ttyp%x", i); |
456 | 156 |
157 /* This is how to get the device name of the control end of a pty. */ | |
158 #define PTY_NAME_SPRINTF \ | |
620 | 159 sprintf (pty_name, "/dev/pty%x", i); |
4485 | 160 |
161 /* (Assume) we do have vfork. */ | |
162 | |
163 #define HAVE_VFORK | |
5966 | 164 |
165 /* Process groups work in the traditional BSD manner. */ | |
166 | |
167 #define BSD_PGRPS |