From 4b8601ff787885aec8a79c20ad659f27a0af8afb Mon Sep 17 00:00:00 2001 From: Gareth Rees Date: Wed, 14 Nov 2012 14:12:12 +0000 Subject: [PATCH] Use three generations and 32 mb of address space. Copied from Perforce Change: 180467 ServerID: perforce.ravenbrook.com --- mps/example/scheme/scheme-advanced.c | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/mps/example/scheme/scheme-advanced.c b/mps/example/scheme/scheme-advanced.c index 4e1faee23e7..73900e6c490 100644 --- a/mps/example/scheme/scheme-advanced.c +++ b/mps/example/scheme/scheme-advanced.c @@ -4459,8 +4459,9 @@ static void *start(void *p, size_t s) */ static mps_gen_param_s obj_gen_params[] = { - { 6400, 0.85 }, - { 6400, 0.45 } + { 6400, 0.80 }, + { 6400, 0.80 }, + { 6400, 0.80 } }; @@ -4481,7 +4482,7 @@ int main(int argc, char *argv[]) It holds all the MPS "global" state and is where everything happens. */ res = mps_arena_create(&arena, mps_arena_class_vm(), - (size_t)(1024ul * 1024 * 1024)); + (size_t)(32ul * 1024 * 1024)); if (res != MPS_RES_OK) error("Couldn't create arena"); /* Create the object format. */