From c782e3571d073bfd81260c0903bdee71a128d90d Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Sun, 18 May 1997 03:54:56 +0000
Subject: [PATCH] [project @ 1997-05-18 03:54:56 by sof] AIX mods

---
 ghc/runtime/storage/mprotect.lc |    5 +++++
 1 file changed, 5 insertions(+)

diff --git a/ghc/runtime/storage/mprotect.lc b/ghc/runtime/storage/mprotect.lc
index 96bd44b..316572d 100644
--- a/ghc/runtime/storage/mprotect.lc
+++ b/ghc/runtime/storage/mprotect.lc
@@ -49,6 +49,11 @@ int getpagesize PROTO((void));
 int mprotect PROTO((caddr_t, size_t, int));
 #endif
 
+#if defined(aix_TARGET_OS)
+/* PROT_NONE doesn't work on aix, PROT_READ works and should suit the job */
+#define PROT_NONE PROT_READ
+#endif
+ 
 /* Needed for FreeBSD (SDM, 96/03) */
 #ifndef PROT_NONE
 #define PROT_NONE 0
-- 
1.7.10.4