From: simonm <unknown>
Date: Thu, 21 May 1998 09:44:40 +0000 (+0000)
Subject: [project @ 1998-05-21 09:44:40 by simonm]
X-Git-Tag: Approx_2487_patches~668
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=b39f861b076e14e8ab5c337df7191c7a43f54e69;p=ghc-hetmet.git

[project @ 1998-05-21 09:44:40 by simonm]
missed one caddr_t.
---

diff --git a/ghc/runtime/storage/mprotect.lc b/ghc/runtime/storage/mprotect.lc
index 96c0e2f..1cef887 100644
--- a/ghc/runtime/storage/mprotect.lc
+++ b/ghc/runtime/storage/mprotect.lc
@@ -70,7 +70,7 @@ char * /*caddr_t*/ addr;
 int size;
 {
     int pagesize = GETPAGESIZE();
-    char * middle = (caddr_t) (((W_) (addr + size / 2)) / pagesize * pagesize);
+    char * middle = (char *) (((W_) (addr + size / 2)) / pagesize * pagesize);
 #if defined(cygwin32_TARGET_OS)
     unsigned int old_prot;
 #endif