From: Simon Marlow <marlowsd@gmail.com>
Date: Tue, 6 Apr 2010 13:04:11 +0000 (+0000)
Subject: don't forget to deRefTSO() in tryWakeupThread()
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=efc8935d189cc6a01e3644157023169fe65d58e5;hp=9dd9e3c4cc170185e5bbdb7b49eb21c553b9b4fc

don't forget to deRefTSO() in tryWakeupThread()
---

diff --git a/rts/Threads.c b/rts/Threads.c
index f07b36a..5723eac 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);