From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 24 Apr 1995 05:52:11 +0000 (+0000)
Subject: (create_process): Don't abort if can't reopen
X-Git-Tag: emacs-19.34~4344
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4aa54ba87234d07006f25ac325f04ee508b9026a;p=emacs.git

(create_process): Don't abort if can't reopen
pty_name in the child.  Exit the child instead.
---

diff --git a/src/process.c b/src/process.c
index 3d1ae0ee000..83de691d393 100644
--- a/src/process.c
+++ b/src/process.c
@@ -1412,13 +1412,18 @@ create_process (process, new_argv, current_dir)
 	      close (xforkin);
 	    xforkout = xforkin = open (pty_name, O_RDWR, 0);
 
+	    if (xforkin < 0)
+	      {
+		write (1, "Couldn't open the pty terminal ", 31);
+		write (1, pty_name, strlen (pty_name));
+		write (1, "\n", 1);
+		_exit (1);
+	      }
+
 #ifdef SET_CHILD_PTY_PGRP
 	    ioctl (xforkin, TIOCSPGRP, &pgrp);
 	    ioctl (xforkout, TIOCSPGRP, &pgrp);
 #endif
-
-	    if (xforkin < 0)
-	      abort ();
 	  }
 #endif /* not UNIPLUS and not RTU */
 #ifdef SETUP_SLAVE_PTY