(defun maybe-install-futex-functions ()
#!+sb-futex
(unless (zerop (extern-alien "linux_supports_futex" int))
- (setf (fdefinition 'get-mutex) #'get-mutex/futex
- (fdefinition 'release-mutex) #'release-mutex/futex
- (fdefinition 'condition-wait) #'condition-wait/futex
- (fdefinition 'condition-broadcast) #'condition-broadcast/futex
- (fdefinition 'condition-notify) #'condition-notify/futex)
+ (sb!ext:without-package-locks
+ (setf (fdefinition 'get-mutex) #'get-mutex/futex
+ (fdefinition 'release-mutex) #'release-mutex/futex
+ (fdefinition 'condition-wait) #'condition-wait/futex
+ (fdefinition 'condition-broadcast) #'condition-broadcast/futex
+ (fdefinition 'condition-notify) #'condition-notify/futex))
t))
(defun make-thread (function)
;;; 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.8.12.11"
+"0.8.12.12"