From d0f77a5b6d7a17375602ea2aa5f899a14b68bbed Mon Sep 17 00:00:00 2001 From: rtoy <rtoy> Date: Wed, 28 Apr 2004 04:29:37 +0000 Subject: [PATCH] Increase static and read-only space to the maximum of 256 MB. (We already had space for this but were only allocating 128 MB. If we want more, we'll have to move things around.) --- lisp/sparc-validate.h | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/lisp/sparc-validate.h b/lisp/sparc-validate.h index 5330c69e1..d2e2f6cba 100644 --- a/lisp/sparc-validate.h +++ b/lisp/sparc-validate.h @@ -1,6 +1,6 @@ /* - $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/sparc-validate.h,v 1.16 2004/01/09 05:15:09 toy Exp $ + $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/sparc-validate.h,v 1.17 2004/04/28 04:29:37 rtoy Exp $ This code was written as part of the CMU Common Lisp project at Carnegie Mellon University, and has been placed in the public domain. @@ -53,6 +53,8 @@ /*#include "internals.h"*/ +/* 128 MB */ +#define MB_128 (0x08000000) /* * * Note: I'm not sure why, but the sizes must be on a @@ -87,16 +89,16 @@ #define READ_ONLY_SPACE_START (SpaceStart_TargetReadOnly) -#define READ_ONLY_SPACE_SIZE (0x08000000 - SPARSE_BLOCK_SIZE) /* 128 MB - 32 KB, 256 MB max */ +#define READ_ONLY_SPACE_SIZE ((2*MB_128) - SPARSE_BLOCK_SIZE) /* 256 MB - 32 KB, 256 MB max */ #define BINDING_STACK_START (0x20000000) -#define BINDING_STACK_SIZE (0x08000000 - SPARSE_BLOCK_SIZE) /* 128 MB - 32 KB, 128 MB max */ +#define BINDING_STACK_SIZE (MB_128 - SPARSE_BLOCK_SIZE) /* 128 MB - 32 KB, 128 MB max */ #define STATIC_SPACE_START (SpaceStart_TargetStatic) -#define STATIC_SPACE_SIZE (0x08000000 - SPARSE_BLOCK_SIZE) /* 128 MB - 32 KB, 256 MB max */ +#define STATIC_SPACE_SIZE ((2*MB_128) - SPARSE_BLOCK_SIZE) /* 256 MB - 32 KB, 256 MB max */ #define CONTROL_STACK_START (0x38000000) -#define CONTROL_STACK_SIZE (0x08000000 - SPARSE_BLOCK_SIZE) /* 128 MB - 32 KB, 128 MB max */ +#define CONTROL_STACK_SIZE (MB_128 - SPARSE_BLOCK_SIZE) /* 128 MB - 32 KB, 128 MB max */ #define CONTROL_STACK_END (CONTROL_STACK_START + CONTROL_STACK_SIZE) #define DYNAMIC_0_SPACE_START (SpaceStart_TargetDynamic) -- GitLab