diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2008-11-11 13:53:44 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2008-11-11 13:53:44 +0000 |
| commit | 7ebf1a69051b1999f74567df6d0d3515539f61e5 (patch) | |
| tree | e8f3357a8202a292a2af9d516c640d9413cec8b4 /rts/STM.c | |
| parent | dcd38ff7690eb9bdfefc3e7b5c29b7269149df87 (diff) | |
| download | haskell-7ebf1a69051b1999f74567df6d0d3515539f61e5.tar.gz | |
Fix parse error with older gccs (#2752)
Diffstat (limited to 'rts/STM.c')
| -rw-r--r-- | rts/STM.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -388,8 +388,8 @@ static void unpark_tso(Capability *cap, StgTSO *tso) { static void unpark_waiters_on(Capability *cap, StgTVar *s) { StgTVarWatchQueue *q; - TRACE("unpark_waiters_on tvar=%p", s); StgTVarWatchQueue *trail; + TRACE("unpark_waiters_on tvar=%p", s); // unblock TSOs in reverse order, to be a bit fairer (#2319) for (q = s -> first_watch_queue_entry, trail = q; q != END_STM_WATCH_QUEUE; |