Skip to content
Snippets Groups Projects
Commit 245286b7 authored by dtc's avatar dtc
Browse files

Reworking of the linux address map to support larger heaps,

and bringing it closer to the FreeBSD map. From Raymond Toy.
parent 14cd225f
No related branches found
No related tags found
No related merge requests found
...@@ -7,7 +7,7 @@ ...@@ -7,7 +7,7 @@
;;; Scott Fahlman or slisp-group@cs.cmu.edu. ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
;;; ;;;
(ext:file-comment (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 @@ ...@@ -175,10 +175,9 @@
;;; ;;;
#-linux (defparameter target-read-only-space-start #x10000000) #-linux (defparameter target-read-only-space-start #x10000000)
#-linux (defparameter target-static-space-start #x28000000) #-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-read-only-space-start #x01000000)
#+linux (defparameter target-static-space-start #x05000000) #+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 ;;; Given that NIL is the first things allocated in static space, we
;;; know its value at compile time: ;;; know its value at compile time:
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
* This code was written as part of the CMU Common Lisp project at * This code was written as part of the CMU Common Lisp project at
* Carnegie Mellon University, and has been placed in the public domain. * 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 @@ ...@@ -63,13 +63,13 @@
#define STATIC_SPACE_START (0x05000000) #define STATIC_SPACE_START (0x05000000)
#define STATIC_SPACE_SIZE (0x02fff000) /* 48MB - 1 page */ #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 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 CONTROL_STACK_SIZE (0x07fff000) /* 128MB - 1 page */
#define DYNAMIC_0_SPACE_START (0x09000000) #define DYNAMIC_0_SPACE_START (0x48000000)
#ifdef GENCGC #ifdef GENCGC
#define DYNAMIC_SPACE_SIZE (0x20000000) /* 512MB */ #define DYNAMIC_SPACE_SIZE (0x20000000) /* 512MB */
#else #else
...@@ -77,6 +77,7 @@ ...@@ -77,6 +77,7 @@
#endif #endif
#endif #endif
#define CONTROL_STACK_END (CONTROL_STACK_START + CONTROL_STACK_SIZE) #define CONTROL_STACK_END (CONTROL_STACK_START + CONTROL_STACK_SIZE)
/* Note that GENCGC only uses dynamic_space 0. */ /* Note that GENCGC only uses dynamic_space 0. */
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment