masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-19 02:10:10 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

(main) [HAVE_SYSVIPC]: Reverse test of fork value.

Browse source
This commit is contained in:
Richard M. Stallman 1994-02-08 23:57:30 +00:00
parent 3fa26c5001
commit 9e3891de7c
1 changed files with 5 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lib-src/emacsserver.c
View file

@ -282,13 +282,15 @@ main ()
}
signal (SIGTERM, msgcatch);
signal (SIGINT, msgcatch);
/* If parent goes away, remove message box and exit */
if (p == 0)
if (p > 0)
{
/* This is executed in the original process that did the fork above. */
/* Get pid of Emacs itself. */
p = getppid ();
setpgrp (); /* Gnu kills process group on exit */
while (1)
{
/* Is Emacs still alive? */
if (kill (p, 0) < 0)
{
msgctl (s, IPC_RMID, 0);
@ -298,6 +300,7 @@ main ()
}
}
/* This is executed in the child made by forking above. */
while (1)
{
if ((fromlen = msgrcv (s, msgp, BUFSIZ - 1, 1, 0)) < 0)