Mercurial > emacs
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 } |