From 245286b76f6c80740f7df41bee173a7a41fe35a4 Mon Sep 17 00:00:00 2001 From: dtc <dtc> Date: Fri, 13 Nov 1998 04:39:43 +0000 Subject: [PATCH] Reworking of the linux address map to support larger heaps, and bringing it closer to the FreeBSD map. From Raymond Toy. --- compiler/x86/parms.lisp | 5 ++--- lisp/x86-validate.h | 9 +++++---- 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/compiler/x86/parms.lisp b/compiler/x86/parms.lisp index cb7a19138..63e4ef2af 100644 --- a/compiler/x86/parms.lisp +++ b/compiler/x86/parms.lisp @@ -7,7 +7,7 @@ ;;; Scott Fahlman or slisp-group@cs.cmu.edu. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/x86/parms.lisp,v 1.13 1998/09/17 10:54:24 dtc Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/x86/parms.lisp,v 1.14 1998/11/13 04:39:43 dtc Exp $") ;;; ;;; ********************************************************************** ;;; @@ -175,10 +175,9 @@ ;;; #-linux (defparameter target-read-only-space-start #x10000000) #-linux (defparameter target-static-space-start #x28000000) -#-linux (defparameter target-dynamic-space-start #x48000000) #+linux (defparameter target-read-only-space-start #x01000000) #+linux (defparameter target-static-space-start #x05000000) -#+linux (defparameter target-dynamic-space-start #x09000000) +(defparameter target-dynamic-space-start #x48000000) ;;; Given that NIL is the first things allocated in static space, we ;;; know its value at compile time: diff --git a/lisp/x86-validate.h b/lisp/x86-validate.h index 7acc502d6..922bac7c8 100644 --- a/lisp/x86-validate.h +++ b/lisp/x86-validate.h @@ -3,7 +3,7 @@ * This code was written as part of the CMU Common Lisp project at * Carnegie Mellon University, and has been placed in the public domain. * - * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/x86-validate.h,v 1.9 1998/09/17 10:54:23 dtc Exp $ + * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/x86-validate.h,v 1.10 1998/11/13 04:39:42 dtc Exp $ * */ @@ -63,13 +63,13 @@ #define STATIC_SPACE_START (0x05000000) #define STATIC_SPACE_SIZE (0x02fff000) /* 48MB - 1 page */ -#define BINDING_STACK_START (0x60000000) +#define BINDING_STACK_START (0x20000000) #define BINDING_STACK_SIZE (0x07fff000) /* 128MB - 1 page */ -#define CONTROL_STACK_START (0x50000000) +#define CONTROL_STACK_START (0x38000000) #define CONTROL_STACK_SIZE (0x07fff000) /* 128MB - 1 page */ -#define DYNAMIC_0_SPACE_START (0x09000000) +#define DYNAMIC_0_SPACE_START (0x48000000) #ifdef GENCGC #define DYNAMIC_SPACE_SIZE (0x20000000) /* 512MB */ #else @@ -77,6 +77,7 @@ #endif #endif + #define CONTROL_STACK_END (CONTROL_STACK_START + CONTROL_STACK_SIZE) /* Note that GENCGC only uses dynamic_space 0. */ -- GitLab