From 30b7cc686b4f027f18dc8254b1f3dd37790a4dc6 Mon Sep 17 00:00:00 2001 From: Neil Brown Date: Sun, 14 Oct 2007 13:25:31 +0000 Subject: [PATCH] Doubled the stack size for C++CSP processes, in order to get cg test 08 passing --- backends/GenerateCPPCSP.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/backends/GenerateCPPCSP.hs b/backends/GenerateCPPCSP.hs index a2cb0a4..3665957 100644 --- a/backends/GenerateCPPCSP.hs +++ b/backends/GenerateCPPCSP.hs @@ -680,7 +680,9 @@ cppgenForwardDeclaration ops (A.Specification _ n (A.Proc _ sm fs _)) name tell ["("] cppgenFormals ops prefixUnderscore fs - tell [") : csp::CSProcess(262144)"] + -- One of the cgtests declares an array of 200*100*sizeof(csp::Time). + -- Assuming csp::Time could be up to 16 bytes, we need half a meg stack: + tell [") : csp::CSProcess(524288)"] genConstructorList fs tell ["{} protected: virtual void run(); };"] where