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/Linker.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/Linker.c')
| -rw-r--r-- | rts/Linker.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index eba9821a3d..07d9e6c346 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -1192,7 +1192,7 @@ static void setOcInitialStatus(ObjectCode* oc) { ObjectCode* mkOc( pathchar *path, char *image, int imageSize, - rtsBool mapped, char *archiveMemberName, int misalignment ) { + bool mapped, char *archiveMemberName, int misalignment ) { ObjectCode* oc; IF_DEBUG(linker, debugBelch("mkOc: start\n")); @@ -1357,7 +1357,7 @@ preloadObjectFile (pathchar *path) #endif /* RTS_LINKER_USE_MMAP */ - oc = mkOc(path, image, fileSize, rtsTrue, NULL, misalignment); + oc = mkOc(path, image, fileSize, true, NULL, misalignment); return oc; } @@ -1573,7 +1573,7 @@ HsInt resolveObjs (void) /* ----------------------------------------------------------------------------- * delete an object from the pool */ -static HsInt unloadObj_ (pathchar *path, rtsBool just_purge) +static HsInt unloadObj_ (pathchar *path, bool just_purge) { ObjectCode *oc, *prev, *next; HsBool unloadedAnyObj = HS_BOOL_FALSE; @@ -1631,7 +1631,7 @@ static HsInt unloadObj_ (pathchar *path, rtsBool just_purge) HsInt unloadObj (pathchar *path) { ACQUIRE_LOCK(&linker_mutex); - HsInt r = unloadObj_(path, rtsFalse); + HsInt r = unloadObj_(path, false); RELEASE_LOCK(&linker_mutex); return r; } @@ -1639,7 +1639,7 @@ HsInt unloadObj (pathchar *path) HsInt purgeObj (pathchar *path) { ACQUIRE_LOCK(&linker_mutex); - HsInt r = unloadObj_(path, rtsTrue); + HsInt r = unloadObj_(path, true); RELEASE_LOCK(&linker_mutex); return r; } |