From: Eli Zaretskii Date: Fri, 2 Jan 2009 15:06:49 +0000 (+0000) Subject: (system_process_attributes): Compute Qtime and Qctime and add them to the alist. X-Git-Tag: emacs-pretest-23.0.90~753 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ac1e417182f4763c6fd8eecf12552a99532b6d3e;p=emacs.git (system_process_attributes): Compute Qtime and Qctime and add them to the alist. --- diff --git a/src/sysdep.c b/src/sysdep.c index 18474c75b1b..1cf9890ecb8 100644 --- a/src/sysdep.c +++ b/src/sysdep.c @@ -3493,12 +3493,18 @@ system_process_attributes (Lisp_Object pid) attrs = Fcons (Fcons (Qstime, ltime_from_jiffies (stime, clocks_per_sec)), attrs); + attrs = Fcons (Fcons (Qtime, + ltime_from_jiffies (stime+utime, clocks_per_sec)), + attrs); attrs = Fcons (Fcons (Qcutime, ltime_from_jiffies (cutime, clocks_per_sec)), attrs); attrs = Fcons (Fcons (Qcstime, ltime_from_jiffies (cstime, clocks_per_sec)), attrs); + attrs = Fcons (Fcons (Qctime, + ltime_from_jiffies (cstime+cutime, clocks_per_sec)), + attrs); attrs = Fcons (Fcons (Qpri, make_number (priority)), attrs); attrs = Fcons (Fcons (Qnice, make_number (nice)), attrs); attrs = Fcons (Fcons (Qthcount, make_fixnum_or_float (thcount_eint)), attrs);