summaryrefslogtreecommitdiff
path: root/rts/Threads.c
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2010-04-06 13:04:11 +0000
committerSimon Marlow <marlowsd@gmail.com>2010-04-06 13:04:11 +0000
commitefc8935d189cc6a01e3644157023169fe65d58e5 (patch)
tree51d0272ae041beb8ebcd46642ad26b3570673146 /rts/Threads.c
parent9dd9e3c4cc170185e5bbdb7b49eb21c553b9b4fc (diff)
downloadhaskell-efc8935d189cc6a01e3644157023169fe65d58e5.tar.gz
don't forget to deRefTSO() in tryWakeupThread()
Diffstat (limited to 'rts/Threads.c')
-rw-r--r--rts/Threads.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/rts/Threads.c b/rts/Threads.c
index f07b36a0fb..5723eace8c 100644
--- a/rts/Threads.c
+++ b/rts/Threads.c
@@ -215,8 +215,9 @@ removeThreadFromDeQueue (Capability *cap,
------------------------------------------------------------------------- */
void
-tryWakeupThread (Capability *cap, StgTSO *tso)
+tryWakeupThread (Capability *cap, StgTSO *tso_)
{
+ StgTSO *tso = deRefTSO(tso_);
traceEventThreadWakeup (cap, tso, tso->cap->no);