diff options
author | Simon Marlow <marlowsd@gmail.com> | 2010-04-06 13:04:11 +0000 |
---|---|---|
committer | Simon Marlow <marlowsd@gmail.com> | 2010-04-06 13:04:11 +0000 |
commit | efc8935d189cc6a01e3644157023169fe65d58e5 (patch) | |
tree | 51d0272ae041beb8ebcd46642ad26b3570673146 /rts/Threads.c | |
parent | 9dd9e3c4cc170185e5bbdb7b49eb21c553b9b4fc (diff) | |
download | haskell-efc8935d189cc6a01e3644157023169fe65d58e5.tar.gz |
don't forget to deRefTSO() in tryWakeupThread()
Diffstat (limited to 'rts/Threads.c')
-rw-r--r-- | rts/Threads.c | 3 |
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); |