X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fntproc.c;h=790454b1bb9b9d262969419b763b2b9ea19141b7;hb=63a686a3d18465a8c96b8cc4a273c295f8a5a379;hp=6a3933281a9313801da9fc5a1bf7d9a06dba03d5;hpb=59eec5f21669e81977b5b1fe9bf717cab49cf7fb;p=chise%2Fxemacs-chise.git.1 diff --git a/src/ntproc.c b/src/ntproc.c index 6a39332..790454b 100644 --- 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 */ /* Synced with FSF Emacs 19.34.6 by Marc Paquette */ +/* #### 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 #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.