[commit: ghc] master: rts: Fix unused function (9bd4864)

[git at git.haskell.org]

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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/9bd48643c917f8e38a0ddca0b6ac1777bbf66f99/ghc

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

commit 9bd48643c917f8e38a0ddca0b6ac1777bbf66f99
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Wed Aug 1 06:15:59 2018 -0400

    rts: Fix unused function


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

9bd48643c917f8e38a0ddca0b6ac1777bbf66f99
 rts/posix/OSMem.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/rts/posix/OSMem.c b/rts/posix/OSMem.c
index 3c4455e..347c7c1 100644
--- a/rts/posix/OSMem.c
+++ b/rts/posix/OSMem.c
@@ -249,10 +249,11 @@ my_mmap (void *addr, W_ size, int operation)
     if (ret == MAP_FAILED) {
         return NULL;
     }
+#endif /* defined(darwin_HOST_OS) */
+
     // Map in committed pages rather than take a fault for each chunk.
     // Also arrange to include them in core-dump files.
     post_mmap_madvise(operation, size, ret);
-#endif /* defined(darwin_HOST_OS) */
 
     return ret;
 }