tjh.dev
nixpkgs mirror (for testing)
github.com/NixOS/nixpkgs
nix
1Fix build with glibc 2.34. Adapted from:
2https://github.com/gcc-mirror/gcc/commit/331763de7d4850702a0f67298f36017c73cdb103
3--- a/gcc/ada/init.c
4+++ b/gcc/ada/init.c
5@@ -579,12 +579,8 @@
6
7 #ifndef __ia64__
8 #define HAVE_GNAT_ALTERNATE_STACK 1
9-/* This must be in keeping with System.OS_Interface.Alternate_Stack_Size.
10- It must be larger than MINSIGSTKSZ and hopefully near 2 * SIGSTKSZ. */
11-# if 16 * 1024 < MINSIGSTKSZ
12-# error "__gnat_alternate_stack too small"
13-# endif
14-char __gnat_alternate_stack[16 * 1024];
15+/* This must be in keeping with System.OS_Interface.Alternate_Stack_Size. */
16+char __gnat_alternate_stack[32 * 1024];
17 #endif
18
19 #ifdef __XENO__
20--- a/gcc/ada/s-osinte-linux.ads
21+++ b/gcc/ada/s-osinte-linux.ads
22@@ -328,7 +328,7 @@
23 oss : access stack_t) return int;
24 pragma Import (C, sigaltstack, "sigaltstack");
25
26- Alternate_Stack_Size : constant := 16 * 1024;
27+ Alternate_Stack_Size : constant := 32 * 1024;
28 -- This must be in keeping with init.c:__gnat_alternate_stack
29
30 Alternate_Stack : aliased char_array (1 .. Alternate_Stack_Size);