Mercurial > emacs
comparison src/process.c @ 8390:ee13e8728666
(create_process): Set default handling for SIGINT, etc.
(wait_reading_process_input): Fix previous change.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 31 Jul 1994 00:00:24 +0000 |
| parents | df850e171c61 |
| children | dd3dfde8f973 |
comparison
equal
deleted
inserted
replaced
| 8389:298183d131b1 | 8390:ee13e8728666 |
|---|---|
| 1407 #endif | 1407 #endif |
| 1408 #endif /* ordinary USG */ | 1408 #endif /* ordinary USG */ |
| 1409 #endif /* not BSD4_1 */ | 1409 #endif /* not BSD4_1 */ |
| 1410 #endif /* SIGCHLD */ | 1410 #endif /* SIGCHLD */ |
| 1411 | 1411 |
| 1412 signal (SIGINT, SIG_DFL); | |
| 1413 signal (SIGQUIT, SIG_DFL); | |
| 1414 | |
| 1412 if (pty_flag) | 1415 if (pty_flag) |
| 1413 child_setup_tty (xforkout); | 1416 child_setup_tty (xforkout); |
| 1414 child_setup (xforkin, xforkout, xforkout, | 1417 child_setup (xforkin, xforkout, xforkout, |
| 1415 new_argv, 1, current_dir); | 1418 new_argv, 1, current_dir); |
| 1416 } | 1419 } |
| 1948 } | 1951 } |
| 1949 | 1952 |
| 1950 /* Wait till there is something to do */ | 1953 /* Wait till there is something to do */ |
| 1951 | 1954 |
| 1952 Available = input_wait_mask; | 1955 Available = input_wait_mask; |
| 1953 if (! XINT (read_kbd) || wait_for_cell != 0) | 1956 if (! XINT (read_kbd) && wait_for_cell == 0) |
| 1954 FD_CLR (keyboard_descriptor, &Available); | 1957 FD_CLR (keyboard_descriptor, &Available); |
| 1955 | 1958 |
| 1956 /* If frame size has changed or the window is newly mapped, | 1959 /* If frame size has changed or the window is newly mapped, |
| 1957 redisplay now, before we start to wait. There is a race | 1960 redisplay now, before we start to wait. There is a race |
| 1958 condition here; if a SIGIO arrives between now and the select | 1961 condition here; if a SIGIO arrives between now and the select |
| 2033 /* If there is any, return immediately | 2036 /* If there is any, return immediately |
| 2034 to give it higher priority than subprocesses */ | 2037 to give it higher priority than subprocesses */ |
| 2035 | 2038 |
| 2036 /* We used to do this if wait_for_cell, | 2039 /* We used to do this if wait_for_cell, |
| 2037 but that caused infinite recursion in selection request events. */ | 2040 but that caused infinite recursion in selection request events. */ |
| 2038 if ((XINT (read_kbd)) | 2041 if ((XINT (read_kbd) || wait_for_cell) |
| 2039 && detect_input_pending ()) | 2042 && detect_input_pending ()) |
| 2040 { | 2043 { |
| 2041 swallow_events (); | 2044 swallow_events (); |
| 2042 if (detect_input_pending ()) | 2045 if (detect_input_pending ()) |
| 2043 break; | 2046 break; |
