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

default (no-op) implementation.

diff --git a/src/ChangeLog b/src/ChangeLog
index aa13e72..b6289f4 100644 (file)
--- 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 fe3a55b..c1f193f 100644 (file)
--- 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)