From: Gabor Melis <mega@hotpop.com>
Date: Thu, 5 Jan 2006 20:00:39 +0000 (+0000)
Subject: 0.9.8.13:
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=c70733ce291ef0f5b0f2dc19f085dfdeb1896b81;p=sbcl.git

0.9.8.13:
  * don't flood the system with GCs in the :BINDING-STACK-GC-SAFETY
    test as SLEEP totally loses track of time (really hurts on true
    multiprocessor systems)
  * log SLEEP bug
---

diff --git a/BUGS b/BUGS
index 0a4436a..1c20aab 100644
--- a/BUGS
+++ b/BUGS
@@ -2112,3 +2112,13 @@ WORKAROUND:
         (foo z)
         (values x)))
   (bar 1) => 11, should be 4.
+
+397: SLEEP accuracy
+  The more interrupts arrive the less accurate SLEEP's timing gets.
+    (time (sb-thread:terminate-thread
+            (prog1 (sb-thread:make-thread (lambda ()
+                                            (loop
+                                             (princ #\!)
+                                             (force-output)
+                                             (sb-ext:gc))))
+              (sleep 1))))
diff --git a/tests/threads.impure.lisp b/tests/threads.impure.lisp
index ddff614..2d72ec1 100644
--- a/tests/threads.impure.lisp
+++ b/tests/threads.impure.lisp
@@ -526,6 +526,7 @@
            (push (sb-thread:make-thread #'exercise-binding) threads)
            (push (sb-thread:make-thread (lambda ()
                                           (loop
+                                           (sleep 0.1)
                                            (send-gc))))
                  threads)
            (sleep 4))
diff --git a/version.lisp-expr b/version.lisp-expr
index d2f31b8..08b7177 100644
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"0.9.8.12"
+"0.9.8.13"