projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Document 'parseStaticFlags'.
[ghc-hetmet.git]
/
rts
/
Threads.c
diff --git
a/rts/Threads.c
b/rts/Threads.c
index
b7f62c8
..
a9d4a72
100644
(file)
--- a/
rts/Threads.c
+++ b/
rts/Threads.c
@@
-510,7
+510,7
@@
unblockOne_ (Capability *cap, StgTSO *tso,
context_switch = 1;
} else {
// we'll try to wake it up on the Capability it was last on.
context_switch = 1;
} else {
// we'll try to wake it up on the Capability it was last on.
- wakeupThreadOnCapability_lock(tso->cap, tso);
+ wakeupThreadOnCapability(cap, tso->cap, tso);
}
#else
appendToRunQueue(cap,tso);
}
#else
appendToRunQueue(cap,tso);
@@
-698,7
+698,7
@@
printThreadBlockage(StgTSO *tso)
break;
#if defined(mingw32_HOST_OS)
case BlockedOnDoProc:
break;
#if defined(mingw32_HOST_OS)
case BlockedOnDoProc:
- debugBelch("is blocked on proc (request: %ld)", tso->block_info.async_result->reqID);
+ debugBelch("is blocked on proc (request: %u)", tso->block_info.async_result->reqID);
break;
#endif
case BlockedOnDelay:
break;
#endif
case BlockedOnDelay: