diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2019-06-04 18:03:41 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2019-06-04 18:03:41 -0400 |
| commit | 5fccdfad28eb2679c2ce65b48b5cbcdc25887266 (patch) | |
| tree | 8f271600a4a78c2bd0b9d2147c1815c2f7351731 | |
| parent | 86259c2d92d151a62eba3458b4442f47bdab395e (diff) | |
| parent | 5d68a56b2fe016f64e93a5ae68e4df96368669d2 (diff) | |
| download | haskell-5fccdfad28eb2679c2ce65b48b5cbcdc25887266.tar.gz | |
Merge branch 'wip/backport-ecc9366a0e0db107c286935130837b2222e2dd82' of https://gitlab.haskell.org/RyanGlScott/ghc into wip/ghc-8.8-merges
| -rw-r--r-- | rts/posix/OSMem.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/posix/OSMem.c b/rts/posix/OSMem.c index bab0b64dae..7a8cd9ab87 100644 --- a/rts/posix/OSMem.c +++ b/rts/posix/OSMem.c @@ -550,8 +550,8 @@ void *osReserveHeapMemory(void *startAddressPtr, W_ *len) * explicitly cast to avoid sign compare error */ if (!getrlimit(RLIMIT_AS, &limit) && limit.rlim_cur > 0 - && *len > (unsigned) limit.rlim_cur) { - *len = (unsigned) limit.rlim_cur; + && *len > (W_) limit.rlim_cur) { + *len = (W_) limit.rlim_cur; } #endif |