]> code.delx.au - gnu-emacs/commitdiff
(system_process_attributes): Compute Qtime and Qctime and add them to the alist.
authorEli Zaretskii <eliz@gnu.org>
Fri, 2 Jan 2009 15:06:49 +0000 (15:06 +0000)
committerEli Zaretskii <eliz@gnu.org>
Fri, 2 Jan 2009 15:06:49 +0000 (15:06 +0000)
src/sysdep.c

index 18474c75b1be399ea8f48f55f20a6363b90536a1..1cf9890ecb8ed3345abcef8efb8271c2ac41940e 100644 (file)
@@ -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);