646b892680
Some checks failed
Periodic Merges (6h) / master → staging-nixos (push) Failing after 12m50s
Periodic Merges (6h) / master → staging-next (push) Failing after 12m54s
Periodic Merges (24h) / merge-base(master,staging) → haskell-updates (push) Failing after 11m54s
Periodic Merges (6h) / staging-next → staging (push) Failing after 12m13s
Periodic Merges (24h) / staging-next-25.05 → staging-25.05 (push) Failing after 13m24s
Periodic Merges (24h) / release-25.05 → staging-next-25.05 (push) Failing after 14m28s
38 lines
1012 B
Diff
38 lines
1012 B
Diff
From dfb5e954a04f59b0456cc4c0ddf3acaf22e0ff07 Mon Sep 17 00:00:00 2001
|
|
From: Richard W.M. Jones <rjones@redhat.com>
|
|
Date: Feb 28 2021 20:45:47 +0000
|
|
Subject: Workaround for glibc non-constant SIGSTKSZ
|
|
|
|
|
|
https://github.com/ocaml/ocaml/issues/10250
|
|
|
|
Signed-off-by: Richard W.M. Jones <rjones@redhat.com>
|
|
|
|
---
|
|
|
|
diff --git a/runtime/signals_nat.c b/runtime/signals_nat.c
|
|
index 8b64ab4..7f0a975 100644
|
|
--- a/runtime/signals_nat.c
|
|
+++ b/runtime/signals_nat.c
|
|
@@ -181,7 +181,19 @@ DECLARE_SIGNAL_HANDLER(trap_handler)
|
|
#error "CONTEXT_SP is required if HAS_STACK_OVERFLOW_DETECTION is defined"
|
|
#endif
|
|
|
|
+#ifndef __GLIBC__
|
|
static char sig_alt_stack[SIGSTKSZ];
|
|
+#else
|
|
+/* glibc 2.34 has non-constant SIGSTKSZ */
|
|
+static char *sig_alt_stack;
|
|
+
|
|
+static void allocate_sig_alt_stack(void) __attribute__((constructor));
|
|
+static void
|
|
+allocate_sig_alt_stack(void)
|
|
+{
|
|
+ sig_alt_stack = malloc(SIGSTKSZ);
|
|
+}
|
|
+#endif
|
|
|
|
/* Code compiled with ocamlopt never accesses more than
|
|
EXTRA_STACK bytes below the stack pointer. */
|
|
|