summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>1998-03-30 21:02:31 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>1998-03-30 21:02:31 +0000
commit51d394a1c51f0a3892eacfcb2ff55b6a98b7003c (patch)
treeb15754bc12c709e910dbe8087d985896a7721628
parent0e929db3d1b632a9f0892c78b2b2acbedce196f1 (diff)
downloadguile-51d394a1c51f0a3892eacfcb2ff55b6a98b7003c.tar.gz
* coop.c (COOP_STKSIZE): Use SCM_EVAL_STACK.
-rw-r--r--libguile/coop.c6
1 files changed, 4 insertions, 2 deletions
diff --git a/libguile/coop.c b/libguile/coop.c
index 74ca44ccc..fff3f6811 100644
--- a/libguile/coop.c
+++ b/libguile/coop.c
@@ -40,13 +40,15 @@
* If you do not wish that, delete this exception notice. */
-/* $Id: coop.c,v 1.6 1998-02-06 18:55:25 mdj Exp $ */
+/* $Id: coop.c,v 1.7 1998-03-30 21:02:31 mdj Exp $ */
/* Cooperative thread library, based on QuickThreads */
#include <qt.h>
+#include "eval.h"
-#define COOP_STKSIZE (0x10000)
+/* #define COOP_STKSIZE (0x10000) */
+#define COOP_STKSIZE (SCM_EVAL_STACK)
/* `alignment' must be a power of 2. */
#define COOP_STKALIGN(sp, alignment) \