* sysdep.c (system_process_attributes): Improve comment.

diff --git a/src/ChangeLog b/src/ChangeLog
index ed808a3..b90db0b 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2012-06-02  Paul Eggert  <eggert@cs.ucla.edu>
+
+       * sysdep.c (system_process_attributes): Improve comment.
+
 2012-06-02  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * keyboard.c: Export real-this-command to Elisp.

diff --git a/src/sysdep.c b/src/sysdep.c
index bf87fa2..3356582 100644 (file)
--- a/src/sysdep.c
+++ b/src/sysdep.c
@@ -3106,7 +3106,8 @@ system_process_attributes (Lisp_Object pid)
          attrs = Fcons (Fcons (Qvsize, make_fixnum_or_float (pinfo.pr_size)), attrs);
          attrs = Fcons (Fcons (Qrss, make_fixnum_or_float (pinfo.pr_rssize)), attrs);
 
-         /* pr_pctcpu and pr_pctmem are encoded as a fixed point 16 bit number in  [0 ... 1].  */
+         /* pr_pctcpu and pr_pctmem are unsigned integers in the
+            range 0 .. 2**15, representing 0.0 .. 1.0.  */
          attrs = Fcons (Fcons (Qpcpu, make_float (100.0 / 0x8000 * pinfo.pr_pctcpu)), attrs);
          attrs = Fcons (Fcons (Qpmem, make_float (100.0 / 0x8000 * pinfo.pr_pctmem)), attrs);