diff options
| author | Richard M. Stallman | 1993-12-23 01:22:23 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-12-23 01:22:23 +0000 |
| commit | 53b6ab286b83624cae9f8ffc4e6372b664d6029f (patch) | |
| tree | 5c691a55f384e441f28a840d8ec50e58f5327812 /src | |
| parent | 6a9ee000ddd93021fac5ae4f1d57adfa3ddc4f2e (diff) | |
| download | emacs-53b6ab286b83624cae9f8ffc4e6372b664d6029f.tar.gz emacs-53b6ab286b83624cae9f8ffc4e6372b664d6029f.zip | |
(deactivate_process) [SVR4_PTYS]: If subtty is not nil, close it.
Diffstat (limited to 'src')
| -rw-r--r-- | src/process.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/process.c b/src/process.c index 105e055b180..408a2579ef0 100644 --- a/src/process.c +++ b/src/process.c | |||
| @@ -1524,6 +1524,10 @@ deactivate_process (proc) | |||
| 1524 | close (inchannel); | 1524 | close (inchannel); |
| 1525 | if (outchannel >= 0 && outchannel != inchannel) | 1525 | if (outchannel >= 0 && outchannel != inchannel) |
| 1526 | close (outchannel); | 1526 | close (outchannel); |
| 1527 | #ifdef SYSV4_PTYS | ||
| 1528 | if (!NILP (p->subtty)) | ||
| 1529 | close (XINT (p->subtty)); | ||
| 1530 | #endif | ||
| 1527 | #endif | 1531 | #endif |
| 1528 | 1532 | ||
| 1529 | XSET (p->infd, Lisp_Int, -1); | 1533 | XSET (p->infd, Lisp_Int, -1); |