(list_system_processes, system_process_attributes) [MSDOS]: Don't use the

default (no-op) implementation.

2 files changed, 27 insertions, 5 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index aa13e72da71..b6289f4a09d 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,23 @@
+2009-01-03  Eli Zaretskii  <eliz@gnu.org>
+
+        * process.c: (Qeuid, Qegid, Qcomm, Qstate, Qppid, Qpgrp, Qsess)
+        (Qttname, Qminflt, Qmajflt, Qcminflt, Qcmajflt, Qutime, Qstime)
+        (Qcutime, Qpri, Qnice, Qthcount, Qstart, Qvsize, Qrss, Qargs)
+        (Quser, Qgroup, Qetime, Qpcpu, Qpmem, Qtpgid, Qcstime)
+        [!subprocesses]: Define.
+        (syms_of_process) [!subprocesses]: Intern and staticpro them.
+        (Flist_system_processes, Fsystem_process_attributes)
+        [!subprocesses]: Call list_system_processes and
+        system_process_attributes instead of returning Qnil.
+
+        * dosfns.c (system_process_attributes, list_system_processes): New
+        functions.
+
+        * vm-limit.c (ret_lim_data) [MSDOS]: New function.
+
+        * sysdep.c (list_system_processes, system_process_attributes) [MSDOS]:
+        Don't use the default (no-op) implementation.
+
 2009-01-03  Jason Rumney  <jasonr@gnu.org>
 
         * keyboard.c (parse_modifiers_uncached): Wheel events are
diff --git a/src/sysdep.c b/src/sysdep.c
index fe3a55bdda6..c1f193f96b6 100644
--- a/src/sysdep.c
+++ b/src/sysdep.c
@@ -1,6 +1,6 @@
 /* Interfaces to system-dependent kernel and library entries.
    Copyright (C) 1985, 1986, 1987, 1988, 1993, 1994, 1995, 1999, 2000, 2001,
-                 2002, 2003, 2004, 2005, 2006, 2007, 2008
+                 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009
                  Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
@@ -3219,8 +3219,9 @@ list_system_processes ()
   return proclist;
 }
 
-/* The WINDOWSNT implementation is on w32.c.  */
-#elif !defined (WINDOWSNT)
+/* The WINDOWSNT implementation is on w32.c.
+   The MSDOS implementation is on dosfns.c.  */
+#elif !defined (WINDOWSNT) && !defined (MSDOS)
 
 Lisp_Object
 list_system_processes ()
@@ -3761,8 +3762,9 @@ system_process_attributes (Lisp_Object pid)
   return attrs;
 }
 
-/* The WINDOWSNT implementation is on w32.c.  */
-#elif !defined (WINDOWSNT)
+/* The WINDOWSNT implementation is on w32.c.
+   The MSDOS implementation is on dosfns.c.  */
+#elif !defined (WINDOWSNT) && !defined (MSDOS)
 
 Lisp_Object
 system_process_attributes (Lisp_Object pid)