From 5ed095bdfed6d335ccc43ac4b826eeb0bf27963e Mon Sep 17 00:00:00 2001 From: "Tobias C. Rittweiler" Date: Sat, 3 Apr 2010 14:57:14 +0000 Subject: [PATCH] 1.0.37.32: Adapt test :GC-DEADLOCK due to 1.0.37.30. --- tests/threads.impure.lisp | 4 ++-- version.lisp-expr | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/tests/threads.impure.lisp b/tests/threads.impure.lisp index 91184e0..6df83ca 100644 --- a/tests/threads.impure.lisp +++ b/tests/threads.impure.lisp @@ -1201,7 +1201,7 @@ (sb-thread:make-thread (lambda () (sleep (random 0.001))) - :name (list :sleep i)) + :name (format nil "SLEEP-~D" i)) (sb-thread:make-thread (lambda () ;; KLUDGE: what we are doing here is explicit, @@ -1211,7 +1211,7 @@ (sb-thread::with-all-threads-lock (sb-thread::with-session-lock (sb-thread::*session*) (sb-ext:gc)))) - :name (list :gc i))) + :name (format nil "GC-~D" i))) (error (e) (format t "~%error creating thread ~D: ~A -- backing off for retry~%" i e) (sleep 0.1) diff --git a/version.lisp-expr b/version.lisp-expr index 98bec2b..01bc7b4 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".) -"1.0.37.31" +"1.0.37.32" -- 1.7.10.4