summaryrefslogtreecommitdiff
path: root/rts/Profiling.c
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2011-12-01 11:56:39 +0000
committerSimon Marlow <marlowsd@gmail.com>2011-12-01 11:57:49 +0000
commitb2d3c5576050a69c26a546ba10726618a72d4b67 (patch)
treea68daf2f7f122a8e7ce1620bfd71e410580e709e /rts/Profiling.c
parent6d18141d880d55958c3392f6a7ae621dc33ee5c1 (diff)
downloadhaskell-b2d3c5576050a69c26a546ba10726618a72d4b67.tar.gz
Forgot an initMutex(); fixes profthreaded failures on Windows
Diffstat (limited to 'rts/Profiling.c')
-rw-r--r--rts/Profiling.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/rts/Profiling.c b/rts/Profiling.c
index ac2708eda1..7fb7f9e3cf 100644
--- a/rts/Profiling.c
+++ b/rts/Profiling.c
@@ -152,6 +152,10 @@ initProfiling1 (void)
capabilities[n].r.rCCCS = CCS_SYSTEM;
}
}
+
+#ifdef THREADED_RTS
+ initMutex(&ccs_mutex);
+#endif
}
void