projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
b40d1af
)
fix a few sloppy conditionals caught by new test in CmmLint
author
Simon Marlow
<simonmar@microsoft.com>
Tue, 20 Jun 2006 15:06:18 +0000
(15:06 +0000)
committer
Simon Marlow
<simonmar@microsoft.com>
Tue, 20 Jun 2006 15:06:18 +0000
(15:06 +0000)
rts/Exception.cmm
patch
|
blob
|
history
diff --git
a/rts/Exception.cmm
b/rts/Exception.cmm
index
a897990
..
5c2ee95
100644
(file)
--- a/
rts/Exception.cmm
+++ b/
rts/Exception.cmm
@@
-119,7
+119,7
@@
unblockAsyncExceptionszh_fast
/* Args: R1 :: IO a */
STK_CHK_GEN( WDS(2), R1_PTR, unblockAsyncExceptionszh_fast);
- if (TO_W_(StgTSO_flags(CurrentTSO)) & TSO_BLOCKEX) {
+ if ((TO_W_(StgTSO_flags(CurrentTSO)) & TSO_BLOCKEX) != 0) {
foreign "C" awakenBlockedExceptionQueue(MyCapability() "ptr",
CurrentTSO "ptr") [R1];