X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fcold-init.lisp;h=bc37148f24de8ef99e02eaacad807f66c61c5a89;hb=cd13034f9415f64cdaa05893a4ac5ff1e95c97bd;hp=bc7d9f546632f4a8fef3d2fbd88d10d3a2536e4a;hpb=e29e89b56564b0d302f0ded969a298b948722add;p=sbcl.git

diff --git a/src/code/cold-init.lisp b/src/code/cold-init.lisp
index bc7d9f5..bc37148 100644
--- a/src/code/cold-init.lisp
+++ b/src/code/cold-init.lisp
@@ -289,6 +289,7 @@ instead (which is another name for the same thing)."))
       ;; disabled by default. Joe User can explicitly enable them if
       ;; desired.
       (set-floating-point-modes :traps '(:overflow :invalid :divide-by-zero))
+      (sb!thread::maybe-install-futex-functions)
 
       ;; Clear pseudo atomic in case this core wasn't compiled with
       ;; support.