diff options
| author | benl@cse.unsw.edu.au <unknown> | 2010-02-03 02:30:29 +0000 |
|---|---|---|
| committer | benl@cse.unsw.edu.au <unknown> | 2010-02-03 02:30:29 +0000 |
| commit | b482880da3b1a849ac8b6157ab693159cdc24998 (patch) | |
| tree | e0c7101a1055358e1b24c4fcf7f85075bbf449ed /rts/posix | |
| parent | 4180687e4fa56dd82407ba950e89bb6e09006fc3 (diff) | |
| download | haskell-b482880da3b1a849ac8b6157ab693159cdc24998.tar.gz | |
Cast to (void*) to stifle warning about signedness
Diffstat (limited to 'rts/posix')
| -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 5d46e68d23..79c7fbfffd 100644 --- a/rts/posix/OSMem.c +++ b/rts/posix/OSMem.c @@ -158,10 +158,10 @@ gen_map_mblocks (lnat size) // unmap the slop bits around the chunk we allocated slop = (W_)ret & MBLOCK_MASK; - if (munmap(ret, MBLOCK_SIZE - slop) == -1) { + if (munmap((void*)ret, MBLOCK_SIZE - slop) == -1) { barf("gen_map_mblocks: munmap failed"); } - if (slop > 0 && munmap(ret+size-slop, slop) == -1) { + if (slop > 0 && munmap((void*)(ret+size-slop), slop) == -1) { barf("gen_map_mblocks: munmap failed"); } |