[commit: ghc] wip/angerman/win32-cross: Fix type. (6c5fdd9)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/angerman/win32-cross
Link       : http://ghc.haskell.org/trac/ghc/changeset/6c5fdd96e35ad90bb6c4083ef3969b2a39b46528/ghc

>---------------------------------------------------------------

commit 6c5fdd96e35ad90bb6c4083ef3969b2a39b46528
Author: Moritz Angermann <moritz.angermann at gmail.com>
Date:   Wed Feb 21 16:42:45 2018 +0800

    Fix type.


>---------------------------------------------------------------

6c5fdd96e35ad90bb6c4083ef3969b2a39b46528
 rts/win32/OSMem.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rts/win32/OSMem.c b/rts/win32/OSMem.c
index c67b95b..534cd15 100644
--- a/rts/win32/OSMem.c
+++ b/rts/win32/OSMem.c
@@ -458,7 +458,7 @@ void *osReserveHeapMemory (void *startAddress, W_ *len)
             sysErrorBelch(
                 "osReserveHeapMemory: VirtualAlloc MEM_RESERVE %llu bytes \
                 at address %p bytes failed",
-                len + MBLOCK_SIZE, startAddress);
+                *len + MBLOCK_SIZE, startAddress);
         }
         stg_exit(EXIT_FAILURE);
     }