comparison src/keyboard.c @ 562:0d73d7b5fff0

*** empty log message ***
author Jim Blandy <jimb@redhat.com>
date Sun, 23 Feb 1992 07:55:19 +0000
parents 1856d835aac3
children c792b1df8110
comparison
equal deleted inserted replaced
561:a819dc25b9e7 562:0d73d7b5fff0
35 #include "disptab.h" 35 #include "disptab.h"
36 #include "keyboard.h" 36 #include "keyboard.h"
37 #include <setjmp.h> 37 #include <setjmp.h>
38 #include <errno.h> 38 #include <errno.h>
39 39
40 #include "emacssignal.h"
41
42 extern int errno;
43
44 /* Get FIONREAD, if it is available. */
45 #ifdef USG
46 #include <termio.h>
47 #include <fcntl.h>
48 #else /* not USG */
49 #ifndef VMS 40 #ifndef VMS
50 #include <sys/ioctl.h> 41 #include <sys/ioctl.h>
51 #endif /* not VMS */
52 #endif /* not USG */
53
54 /* UNIPLUS systems may have FIONREAD. */
55 #ifdef UNIPLUS
56 #include <sys.ioctl.h>
57 #endif 42 #endif
43
44 #include "syssignal.h"
45 #include "systerm.h"
46
47 extern int errno;
58 48
59 #ifdef HAVE_X_WINDOWS 49 #ifdef HAVE_X_WINDOWS
60 extern Lisp_Object Vmouse_grabbed; 50 extern Lisp_Object Vmouse_grabbed;
61 51
62 /* Make all keyboard buffers much bigger when using X windows. */ 52 /* Make all keyboard buffers much bigger when using X windows. */
331 /* Nonzero while interrupts are temporarily deferred during redisplay. */ 321 /* Nonzero while interrupts are temporarily deferred during redisplay. */
332 int interrupts_deferred; 322 int interrupts_deferred;
333 323
334 /* nonzero means use ^S/^Q for flow control. */ 324 /* nonzero means use ^S/^Q for flow control. */
335 int flow_control; 325 int flow_control;
336
337 #ifndef BSD4_1
338 #define sigfree() sigsetmask (SIGEMPTYMASK)
339 #define sigholdx(sig) sigsetmask (sigmask (sig))
340 #define sigblockx(sig) sigblock (sigmask (sig))
341 #define sigunblockx(sig) sigblock (SIGEMPTYMASK)
342 #define sigpausex(sig) sigpause (0)
343 #endif /* not BSD4_1 */
344
345 #ifdef BSD4_1
346 #define SIGIO SIGTINT
347 /* sigfree and sigholdx are in sysdep.c */
348 #define sigblockx(sig) sighold (sig)
349 #define sigunblockx(sig) sigrelse (sig)
350 #define sigpausex(sig) sigpause (sig)
351 #endif /* BSD4_1 */
352 326
353 /* Allow m- file to inhibit use of FIONREAD. */ 327 /* Allow m- file to inhibit use of FIONREAD. */
354 #ifdef BROKEN_FIONREAD 328 #ifdef BROKEN_FIONREAD
355 #undef FIONREAD 329 #undef FIONREAD
356 #endif 330 #endif
1181 1155
1182 if (_setjmp (getcjmp)) 1156 if (_setjmp (getcjmp))
1183 { 1157 {
1184 XSET (c, Lisp_Int, quit_char); 1158 XSET (c, Lisp_Int, quit_char);
1185 1159
1186 /* Returning quit_char from this function represents a
1187 resolution to the quit request, so clear the quit flag.
1188 This prevents us from returning quit_char many times
1189 for the same quit request. */
1190 Vquit_flag = Qnil;
1191
1192 waiting_for_input = 0; 1160 waiting_for_input = 0;
1193 input_available_clear_word = 0; 1161 input_available_clear_word = 0;
1194 1162
1195 goto non_reread; 1163 goto non_reread;
1196 } 1164 }