projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 1996-06-27 16:13:29 by partain]
[ghc-hetmet.git]
/
ghc
/
runtime
/
storage
/
mprotect.lc
diff --git
a/ghc/runtime/storage/mprotect.lc
b/ghc/runtime/storage/mprotect.lc
index
a27199f
..
dabf3c4
100644
(file)
--- a/
ghc/runtime/storage/mprotect.lc
+++ b/
ghc/runtime/storage/mprotect.lc
@@
-10,7
+10,6
@@
Is @mprotect@ POSIX now?
\begin{code}
Is @mprotect@ POSIX now?
\begin{code}
-
#if STACK_CHECK_BY_PAGE_FAULT
/* #define STK_CHK_DEBUG */
#if STACK_CHECK_BY_PAGE_FAULT
/* #define STK_CHK_DEBUG */
@@
-36,7
+35,12
@@
Is @mprotect@ POSIX now?
# if defined(HAVE_GETPAGESIZE)
# define GETPAGESIZE() getpagesize()
# else
# if defined(HAVE_GETPAGESIZE)
# define GETPAGESIZE() getpagesize()
# else
-# error getpagesize
+# if defined(linux_TARGET_OS) || defined(linuxaout_TARGET_OS)
+# /* it has it, but it is in BSD land; easier to just say so */
+# define GETPAGESIZE() getpagesize()
+# else
+# error getpagesize
+# endif
# endif
# endif
# endif
# endif
@@
-45,6
+49,11
@@
extern int getpagesize PROTO((void));
extern int mprotect PROTO((caddr_t, size_t, int));
#endif
extern int mprotect PROTO((caddr_t, size_t, int));
#endif
+/* Needed for FreeBSD (SDM, 96/03) */
+#ifndef PROT_NONE
+#define PROT_NONE 0
+#endif
+
void
unmapMiddleStackPage(addr_, size)
char * /*caddr_t*/ addr_;
void
unmapMiddleStackPage(addr_, size)
char * /*caddr_t*/ addr_;
@@
-74,5
+83,4
@@
int size;
}
#endif /* STACK_CHECK_BY_PAGE_FAULT */
}
#endif /* STACK_CHECK_BY_PAGE_FAULT */
-
\end{code}
\end{code}