From: squirek Date: Thu, 12 Sep 2024 14:37:49 +0000 (+0000) Subject: ada: Increase stack size for Windows tasking programs X-Git-Tag: basepoints/gcc-16~4917 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c3b0c0b0dc464537924d8641cb33ffa30698e0ee;p=thirdparty%2Fgcc.git ada: Increase stack size for Windows tasking programs This patch increases the default tasking stack size for Windows tasking program to 8 mb to avoid use of pragma Linker_Options in the general case. gcc/ada/ChangeLog: * libgnarl/s-taprop__mingw.adb: Modify stack size and update documentation. --- diff --git a/gcc/ada/libgnarl/s-taprop__mingw.adb b/gcc/ada/libgnarl/s-taprop__mingw.adb index 8c7f59f1c5d2..3c4e4b91a7e6 100644 --- a/gcc/ada/libgnarl/s-taprop__mingw.adb +++ b/gcc/ada/libgnarl/s-taprop__mingw.adb @@ -68,11 +68,11 @@ package body System.Task_Primitives.Operations is use System.Win32; use System.Win32.Ext; - pragma Link_With ("-Xlinker --stack=0x200000,0x1000"); - -- Change the default stack size (2 MB) for tasking programs on Windows. - -- This allows about 1000 tasks running at the same time. Note that - -- we set the stack size for non tasking programs on System unit. - -- Also note that under Windows XP, we use a Windows XP extension to + pragma Link_With ("-Xlinker --stack=0x800000,0x1000"); + -- Change the default stack size (8 MB) for tasking programs on Windows. + -- This allows at least 1000 tasks running at the same time. Note that + -- we set the stack size for non tasking programs in the System unit. + -- Also note that under Windows, we use a Windows extension to -- specify the stack size on a per task basis, as done under other OSes. ----------------