diff options
| author | Ben Gamari <bgamari.foss@gmail.com> | 2016-11-29 16:51:30 -0500 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2016-11-29 16:51:30 -0500 |
| commit | 428e152be6bb0fd3867e41cee82a6d5968a11a26 (patch) | |
| tree | e43d217c10c052704f872cd7e1df4d335c12d376 /rts/ThreadPaused.c | |
| parent | 56d74515396c8b6360ba7898cbc4b68f0f1fb2ea (diff) | |
| download | haskell-428e152be6bb0fd3867e41cee82a6d5968a11a26.tar.gz | |
Use C99's bool
Test Plan: Validate on lots of platforms
Reviewers: erikd, simonmar, austin
Reviewed By: erikd, simonmar
Subscribers: michalt, thomie
Differential Revision: https://phabricator.haskell.org/D2699
Diffstat (limited to 'rts/ThreadPaused.c')
| -rw-r--r-- | rts/ThreadPaused.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/rts/ThreadPaused.c b/rts/ThreadPaused.c index e9b297bfbb..c270e69a51 100644 --- a/rts/ThreadPaused.c +++ b/rts/ThreadPaused.c @@ -200,7 +200,7 @@ threadPaused(Capability *cap, StgTSO *tso) uint32_t words_to_squeeze = 0; uint32_t weight = 0; uint32_t weight_pending = 0; - rtsBool prev_was_update_frame = rtsFalse; + bool prev_was_update_frame = false; StgWord heuristic_says_squeeze; // Check to see whether we have threads waiting to raise @@ -300,7 +300,7 @@ threadPaused(Capability *cap, StgTSO *tso) // And continue with threadPaused; there might be // yet more computation to suspend. frame = (StgClosure *)(tso->stackobj->sp + 2); - prev_was_update_frame = rtsFalse; + prev_was_update_frame = false; continue; } @@ -342,7 +342,7 @@ threadPaused(Capability *cap, StgTSO *tso) weight += weight_pending; weight_pending = 0; } - prev_was_update_frame = rtsTrue; + prev_was_update_frame = true; break; case UNDERFLOW_FRAME: @@ -355,7 +355,7 @@ threadPaused(Capability *cap, StgTSO *tso) uint32_t frame_size = stack_frame_sizeW(frame); weight_pending += frame_size; frame = (StgClosure *)((StgPtr)frame + frame_size); - prev_was_update_frame = rtsFalse; + prev_was_update_frame = false; } } } @@ -373,7 +373,7 @@ end: words_to_squeeze, weight, heuristic_says_squeeze ? "YES" : "NO"); - if (RtsFlags.GcFlags.squeezeUpdFrames == rtsTrue && + if (RtsFlags.GcFlags.squeezeUpdFrames == true && heuristic_says_squeeze) { stackSqueeze(cap, tso, (StgPtr)frame); tso->flags |= TSO_SQUEEZED; |