X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinker.c;h=c3944fea419347c58db8c65fc8706975cb17a3a5;hb=c97259cd34b45eb5c06e93e82042dcca784609a6;hp=7db88cb62553ade95004f00e978b012911396ba6;hpb=c94dfcb8c149f7bc5e7b9313f63f762e91c94a1d;p=ghc-hetmet.git

diff --git a/rts/Linker.c b/rts/Linker.c
index 7db88cb..c3944fe 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -1292,7 +1292,7 @@ mmap_again:
 #if defined(x86_64_HOST_ARCH)
    if (mmap_32bit_base != 0) {
        if (result == map_addr) {
-           mmap_32bit_base = map_addr + size;
+           mmap_32bit_base = (StgWord8*)map_addr + size;
        } else {
            if ((W_)result > 0x80000000) {
                // oops, we were given memory over 2Gb
@@ -1310,7 +1310,7 @@ mmap_again:
                // hmm, we were given memory somewhere else, but it's
                // still under 2Gb so we can use it.  Next time, ask
                // for memory right after the place we just got some
-               mmap_32bit_base = (void*)result + size;
+               mmap_32bit_base = (StgWord8*)result + size;
            }
        }
    } else {