Mercurial > emacs
comparison src/process.c @ 2120:fc3cdca22f8d
* process.c (process_send_signal): In the TERMIOS code for sending
control characters to processes, don't try to return Qnil; just
return.
* process.c [! subprocesses] (wait_reading_process_input):
Remember to re-enable polling for input.
| author | Jim Blandy <jimb@redhat.com> |
|---|---|
| date | Thu, 11 Mar 1993 07:14:16 +0000 |
| parents | 3ddb163a9201 |
| children | 5e58643bb169 |
comparison
equal
deleted
inserted
replaced
| 2119:4077ef8ad483 | 2120:fc3cdca22f8d |
|---|---|
| 2340 switch (signo) | 2340 switch (signo) |
| 2341 { | 2341 { |
| 2342 case SIGINT: | 2342 case SIGINT: |
| 2343 tcgetattr (XFASTINT (p->infd), &t); | 2343 tcgetattr (XFASTINT (p->infd), &t); |
| 2344 send_process (proc, &t.c_cc[VINTR], 1); | 2344 send_process (proc, &t.c_cc[VINTR], 1); |
| 2345 return Qnil; | 2345 return; |
| 2346 | 2346 |
| 2347 case SIGQUIT: | 2347 case SIGQUIT: |
| 2348 tcgetattr (XFASTINT (p->infd), &t); | 2348 tcgetattr (XFASTINT (p->infd), &t); |
| 2349 send_process (proc, &t.c_cc[VQUIT], 1); | 2349 send_process (proc, &t.c_cc[VQUIT], 1); |
| 2350 return Qnil; | 2350 return; |
| 2351 | 2351 |
| 2352 case SIGTSTP: | 2352 case SIGTSTP: |
| 2353 tcgetattr (XFASTINT (p->infd), &t); | 2353 tcgetattr (XFASTINT (p->infd), &t); |
| 2354 #ifdef VSWTCH | 2354 #ifdef VSWTCH |
| 2355 send_process (proc, &t.c_cc[VSWTCH], 1); | 2355 send_process (proc, &t.c_cc[VSWTCH], 1); |
| 2356 #else | 2356 #else |
| 2357 send_process (proc, &t.c_cc[VSUSP], 1); | 2357 send_process (proc, &t.c_cc[VSUSP], 1); |
| 2358 #endif | 2358 #endif |
| 2359 return Qnil; | 2359 return; |
| 2360 } | 2360 } |
| 2361 | 2361 |
| 2362 #else /* ! HAVE_TERMIOS */ | 2362 #else /* ! HAVE_TERMIOS */ |
| 2363 | 2363 |
| 2364 /* On Berkeley descendants, the following IOCTL's retrieve the | 2364 /* On Berkeley descendants, the following IOCTL's retrieve the |
| 3165 we should exit. */ | 3165 we should exit. */ |
| 3166 if (nfds >= 0) | 3166 if (nfds >= 0) |
| 3167 break; | 3167 break; |
| 3168 } | 3168 } |
| 3169 | 3169 |
| 3170 start_polling (); | |
| 3171 | |
| 3170 return 0; | 3172 return 0; |
| 3171 } | 3173 } |
| 3172 | 3174 |
| 3173 | 3175 |
| 3174 DEFUN ("get-buffer-process", Fget_buffer_process, Sget_buffer_process, 1, 1, 0, | 3176 DEFUN ("get-buffer-process", Fget_buffer_process, Sget_buffer_process, 1, 1, 0, |