From a86e4bfb5a607e4d3fdce12b51f280364bc1fd6d Mon Sep 17 00:00:00 2001 From: Juan Jose Garcia Ripoll Date: Thu, 2 Oct 2008 09:36:02 +0200 Subject: [PATCH] Increase default stack sizes --- src/h/config.h.in | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/h/config.h.in b/src/h/config.h.in index 7252d2708..942210f69 100644 --- a/src/h/config.h.in +++ b/src/h/config.h.in @@ -327,10 +327,10 @@ typedef unsigned @CL_FIXNUM_TYPE@ cl_hashkey; /* * The lisp environment has several stacks. These are their limits: */ -#define BDSSIZE 2048 /* Size of Binding Stack */ -#define BDSGETA 16 /* Safety zone of BDS */ -#define FRSSIZE 1024 /* Size of Frame Stack */ -#define FRSGETA 16 /* Safety zone of FRS */ +#define BDSSIZE 8192 /* Size of Binding Stack */ +#define BDSGETA 128 /* Safety zone of BDS */ +#define FRSSIZE 2048 /* Size of Frame Stack */ +#define FRSGETA 128 /* Safety zone of FRS */ #ifdef THREADS #define CSSIZE 7500 /* Size of C Stack of each thread */ #define CSGETA 500