summaryrefslogtreecommitdiff
path: root/includes/Rts.h
diff options
context:
space:
mode:
authorIan Lynagh <ian@well-typed.com>2013-06-15 19:07:58 +0100
committerIan Lynagh <ian@well-typed.com>2013-06-15 19:07:58 +0100
commit75947bb63794cae5950f679c8df86441b736b3fa (patch)
treed99b4deb0596840c40fac73ef22344e676102d7e /includes/Rts.h
parent9a8c20d0d7956843cc7fbbd24f5592ea39c81be9 (diff)
downloadhaskell-75947bb63794cae5950f679c8df86441b736b3fa.tar.gz
Optimise lockClosure when n_capabilities == 1; fixes #693
Based on a patch from Yuras Shumovich.
Diffstat (limited to 'includes/Rts.h')
-rw-r--r--includes/Rts.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/includes/Rts.h b/includes/Rts.h
index bea4c47246..122637c465 100644
--- a/includes/Rts.h
+++ b/includes/Rts.h
@@ -203,6 +203,7 @@ INLINE_HEADER Time fsecondsToTime (double t)
#include "rts/SpinLock.h"
#include "rts/Messages.h"
+#include "rts/Threads.h"
/* Storage format definitions */
#include "rts/storage/FunTypes.h"
@@ -230,7 +231,6 @@ INLINE_HEADER Time fsecondsToTime (double t)
#include "rts/Globals.h"
#include "rts/IOManager.h"
#include "rts/Linker.h"
-#include "rts/Threads.h"
#include "rts/Ticky.h"
#include "rts/Timer.h"
#include "rts/Stable.h"