update.

[chise/xemacs-chise.git.1] / src / ntproc.c

diff --git a/src/ntproc.c b/src/ntproc.c
index 6a39332..790454b 100644 (file)
--- a/src/ntproc.c
+++ b/src/ntproc.c
@@ -1,4 +1,4 @@
-/* Process support for Windows NT port of XEMACS.
+/* Old process support under MS Windows, soon to die.
    Copyright (C) 1992, 1995 Free Software Foundation, Inc.
 
 This file is part of XEmacs.
@@ -24,6 +24,16 @@ Boston, MA 02111-1307, USA.
 /* Adapted for XEmacs by David Hobley <david@spook-le0.cia.com.au> */
 /* Synced with FSF Emacs 19.34.6 by Marc Paquette <marcpa@cam.org> */
 
+/* #### This ENTIRE file is only around because of callproc.c, which
+   in turn is only used in batch mode.
+
+   We only need two things to get rid of both this and callproc.c:
+
+   -- my `stderr-proc' ws, which adds support for a separate stderr
+      in asynch. subprocesses. (it's a feature in `old-call-process-internal'.)
+   -- a noninteractive event loop that supports processes.
+*/
+
 #include <config.h>
 #undef signal
 #undef wait
@@ -160,7 +170,7 @@ delete_child (child_process *cp)
   /* Should not be deleting a child that is still needed. */
   for (i = 0; i < MAXDESC; i++)
     if (fd_info[i].cp == cp)
-      abort ();
+      ABORT ();
 
   if (!CHILD_ACTIVE (cp))
     return;
@@ -242,7 +252,7 @@ _sys_read_ahead (int fd)
       || (fd_info[fd].flags & FILE_READ) == 0)
     {
       /* fd is not a pipe or socket */
-      abort ();
+      ABORT ();
     }
   
   cp->status = STATUS_READ_IN_PROGRESS;
@@ -394,7 +404,7 @@ create_child (const char *exe, char *cmdline, char *env,
   SECURITY_DESCRIPTOR sec_desc;
   char dir[ MAXPATHLEN ];
   
-  if (cp == NULL) abort ();
+  if (cp == NULL) ABORT ();
   
   xzero (start);
   start.cb = sizeof (start);
@@ -1316,7 +1326,7 @@ When non-nil, they show their window in the method of their choice.
               &Vwin32_start_process_share_console /*
     When nil, processes started via start-process are given a new console.
 When non-nil, they share the Emacs console; this has the limitation of
-allowing only only DOS subprocess to run at a time (whether started directly
+allowing only one DOS subprocess to run at a time (whether started directly
 or indirectly by Emacs), and preventing Emacs from cleanly terminating the
 subprocess group, but may allow Emacs to interrupt a subprocess that doesn't
 otherwise respond to interrupts from Emacs.