From: Simon Marlow <marlowsd@gmail.com>
Date: Mon, 17 Nov 2008 14:28:31 +0000 (+0000)
Subject: fix compile breakage on Windows
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=27f66c2862bb4ff164a80111db2a66f2aa78e46f

fix compile breakage on Windows
---

diff --git a/rts/Linker.c b/rts/Linker.c
index 357023d..1fbe602 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -1292,6 +1292,7 @@ void ghci_enquire ( char* addr )
 static unsigned int PLTSize(void);
 #endif
 
+#ifdef USE_MMAP
 static void *
 mmapForLinker (size_t bytes, nat flags, int fd)
 {
@@ -1346,6 +1347,7 @@ mmap_again:
 
    return result;
 }
+#endif // USE_MMAP
 
 /* -----------------------------------------------------------------------------
  * Load an obj (populate the global symbol table, but don't resolve yet)