From: Chris Hanson <org/chris-hanson/cph>
Date: Fri, 21 Mar 1997 02:06:08 +0000 (+0000)
Subject: In linux_heap_malloc, use the MAP_FIXED flag to force the kernel to
X-Git-Tag: 20090517-FFI~5233
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=73f53a922d66d506d45918c5c8f805eb60c6df39;p=mit-scheme.git

In linux_heap_malloc, use the MAP_FIXED flag to force the kernel to
provide the page at the given address.  Version 1.2 kernels ignore the
"start address" argument if this flag is unspecified.
---

diff --git a/v7/src/microcode/ux.c b/v7/src/microcode/ux.c
index 1f9187f8e..2118c68ff 100644
--- a/v7/src/microcode/ux.c
+++ b/v7/src/microcode/ux.c
@@ -1,8 +1,8 @@
 /* -*-C-*-
 
-$Id: ux.c,v 1.15 1996/12/16 04:37:31 cph Exp $
+$Id: ux.c,v 1.16 1997/03/21 02:06:08 cph Exp $
 
-Copyright (c) 1990-96 Massachusetts Institute of Technology
+Copyright (c) 1990-97 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -654,7 +654,7 @@ linux_heap_malloc (unsigned long requested_length)
     = (mmap (((void *) ps),
 	     (((requested_length + (ps - 1)) / ps) * ps),
 	     (PROT_EXEC | PROT_READ | PROT_WRITE),
-	     (MAP_PRIVATE | MAP_ANONYMOUS),
+	     (MAP_PRIVATE | MAP_ANONYMOUS | MAP_FIXED),
 	     0, 0));
   return ((addr == ((void *) (-1))) ? 0 : addr);
 }