Mercurial > hg > xemacs-beta

diff src/process.c @ 36:c53a95d3c46d r19-15b101

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b101
author cvs
date Mon, 13 Aug 2007 08:53:38 +0200
parents ec9a17fef872
children 8d2a9b52c682
line wrap: on
line diff
--- a/src/process.c	Mon Aug 13 08:53:21 2007 +0200
+++ b/src/process.c	Mon Aug 13 08:53:38 2007 +0200
@@ -2152,6 +2152,8 @@
   int i;
   struct Lisp_Process *p;
 
+  if (exited_processes_index <= 0)
+      return;
   EMACS_BLOCK_SIGNAL (SIGCHLD);
   for (i = 0; i < exited_processes_index; i++)
     {
@@ -2232,6 +2234,8 @@
 static void
 record_exited_processes (int block_sigchld)
 {
+  if (!sigchld_happened)
+      return;
   if (block_sigchld)
     EMACS_BLOCK_SIGNAL (SIGCHLD);