[Openmcl-cvs-notifications] r14158 - /trunk/source/level-1/linux-files.lisp

gb at clozure.com gb at clozure.com
Mon Aug 9 02:04:45 CDT 2010


Author: gb
Date: Mon Aug  9 02:04:44 2010
New Revision: 14158

Log:
In CPU-COUNT on Linux/Solaris: use #$_SC_NPROCESSORS_CONF.  (This
seems to return the actual number of available procesessors, including
any that may be temporarily offline for power-management or similar
reasons.)

Modified:
    trunk/source/level-1/linux-files.lisp

Modified: trunk/source/level-1/linux-files.lisp
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/source/level-1/linux-files.lisp (original)
+++ trunk/source/level-1/linux-files.lisp Mon Aug  9 02:04:44 2010
@@ -2039,7 +2039,7 @@
                 1))
             #+(or linux-target solaris-target)
             (or
-             (let* ((n (#_sysconf #$_SC_NPROCESSORS_ONLN)))
+             (let* ((n (#_sysconf #$_SC_NPROCESSORS_CONF)))
                (declare (fixnum n))
                (if (> n 0) n))
              #+linux-target



More information about the Openmcl-cvs-notifications mailing list