[project @ 2001-02-19 12:13:49 by simonmar]
authorsimonmar <unknown>
Mon, 19 Feb 2001 12:13:49 +0000 (12:13 +0000)
committersimonmar <unknown>
Mon, 19 Feb 2001 12:13:49 +0000 (12:13 +0000)
Rather than implement -K (which would probably need another primop),
simply bump the maximum stack size to 8M.  It dynamically grows
anyhow.

ghc/compiler/parser/hschooks.c

index 6d94290..de54936 100644 (file)
@@ -20,6 +20,7 @@ defaultsHook (void)
 {
 #if __GLASGOW_HASKELL__ >= 408
     RtsFlags.GcFlags.heapSizeSuggestion = 6*1024*1024 / BLOCK_SIZE;
+    RtsFlags.GcFlags.maxStkSize         = 8*1024*1024 / sizeof(W_);
 #endif
 #if __GLASGOW_HASKELL__ >= 411
     RtsFlags.GcFlags.giveStats = COLLECT_GC_STATS;