Changeset 5984

Timestamp:

Mar 7, 2007, 5:56:01 AM (18 years ago)

Author:

Gary Byers

Message:

Determing *spin-lock-tries* at launch time, based on cpu-count.
YIELD moved here, does #_sched_yield rather than something lower-level.

File:

• trunk/ccl/level-1/linux-files.lisp (modified) (1 diff)

trunk/ccl/level-1/linux-files.lisp

@@ -1131 +1131 @@
                   1)))
             )))
+
+(def-load-pointers spin-count ()
+  (if (eql 1 (cpu-count))
+    (setq *spin-lock-tries* 1)
+    (setq *spin-lock-tries 1024)))
+
+(defun yield ()
+  (#_sched_yield))