projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Find the correct external ids when there's a wrapper
[ghc-hetmet.git]
/
rts
/
Threads.c
diff --git
a/rts/Threads.c
b/rts/Threads.c
index
5723eac
..
25241c7
100644
(file)
--- a/
rts/Threads.c
+++ b/
rts/Threads.c
@@
-215,10
+215,14
@@
removeThreadFromDeQueue (Capability *cap,
------------------------------------------------------------------------- */
void
------------------------------------------------------------------------- */
void
-tryWakeupThread (Capability *cap, StgTSO *tso_)
+tryWakeupThread (Capability *cap, StgTSO *tso)
{
{
- StgTSO *tso = deRefTSO(tso_);
+ tryWakeupThread_(cap, deRefTSO(tso));
+}
+void
+tryWakeupThread_ (Capability *cap, StgTSO *tso)
+{
traceEventThreadWakeup (cap, tso, tso->cap->no);
#ifdef THREADED_RTS
traceEventThreadWakeup (cap, tso, tso->cap->no);
#ifdef THREADED_RTS