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/sm/Sanity.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/sm/Sanity.c')
| -rw-r--r-- | rts/sm/Sanity.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c index 413aee945b..5a2923820c 100644 --- a/rts/sm/Sanity.c +++ b/rts/sm/Sanity.c @@ -557,7 +557,7 @@ checkTSO(StgTSO *tso) Optionally also check the sanity of the TSOs. */ void -checkGlobalTSOList (rtsBool checkTSOs) +checkGlobalTSOList (bool checkTSOs) { StgTSO *tso; uint32_t g; @@ -712,7 +712,7 @@ checkNurserySanity (nursery *nursery) } static void checkGeneration (generation *gen, - rtsBool after_major_gc USED_IF_THREADS) + bool after_major_gc USED_IF_THREADS) { uint32_t n; gen_workspace *ws; @@ -741,7 +741,7 @@ static void checkGeneration (generation *gen, } /* Full heap sanity check. */ -static void checkFullHeap (rtsBool after_major_gc) +static void checkFullHeap (bool after_major_gc) { uint32_t g, n; @@ -753,7 +753,7 @@ static void checkFullHeap (rtsBool after_major_gc) } } -void checkSanity (rtsBool after_gc, rtsBool major_gc) +void checkSanity (bool after_gc, bool major_gc) { checkFullHeap(after_gc && major_gc); @@ -763,7 +763,7 @@ void checkSanity (rtsBool after_gc, rtsBool major_gc) // does nothing in this case. if (after_gc) { checkMutableLists(); - checkGlobalTSOList(rtsTrue); + checkGlobalTSOList(true); } } @@ -875,14 +875,14 @@ genBlocks (generation *gen) } void -memInventory (rtsBool show) +memInventory (bool show) { uint32_t g, i; W_ gen_blocks[RtsFlags.GcFlags.generations]; W_ nursery_blocks, retainer_blocks, arena_blocks, exec_blocks, gc_free_blocks = 0; W_ live_blocks = 0, free_blocks = 0; - rtsBool leak; + bool leak; // count the blocks we current have |