From a78a8b603889bfc9c49d475448cea867ff11c4f5 Mon Sep 17 00:00:00 2001 From: ceriel Date: Wed, 25 Sep 1991 09:14:25 +0000 Subject: [PATCH] Gave coroutine more stack space --- lang/m2/test/Thalmann/StoreFetch.mod | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) 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. -- 2.34.1