From: ceriel <none@none>
Date: Wed, 25 Sep 1991 09:14:25 +0000 (+0000)
Subject: Gave coroutine more stack space
X-Git-Tag: release-5-5~826
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=a78a8b603889bfc9c49d475448cea867ff11c4f5;p=ack.git

Gave coroutine more stack space
---

diff --git a/lang/m2/test/Thalmann/StoreFetch.mod b/lang/m2/test/Thalmann/StoreFetch.mod
index 9b913db36..8f7ecaf83 100644
--- a/lang/m2/test/Thalmann/StoreFetch.mod
+++ b/lang/m2/test/Thalmann/StoreFetch.mod
@@ -46,7 +46,7 @@ MODULE StoreFetch;
 	Init(NonEmpty);
   END SharedBuffer;
 
-  CONST	Max = 80;
+  CONST	Max = 256;
 	eos = 0C;
 
   TYPE	StringType = ARRAY[0..Max-1] OF CHAR;
@@ -85,7 +85,7 @@ MODULE StoreFetch;
 
 BEGIN
 	Init(EndOfTransfer);
-	StartProcess(Store, 500);
-	StartProcess(Fetch, 500);
+	StartProcess(Store, 2000);
+	StartProcess(Fetch, 2000);
 	WAIT(EndOfTransfer);
 END StoreFetch.