From 6e6aab0b6af0bf60b2c7276fa9ee6ca6da9aef88 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Thu, 23 Jan 2020 09:17:17 +0100
Subject: gnu: guile-next: Disable JIT on armhf-linux.

* gnu/packages/guile.scm (guile-3.0)[arguments]: New field.
---
 gnu/packages/guile.scm | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index c8c44b7fcb..289158ea1b 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -296,6 +296,14 @@ without requiring the source code to be rewritten.")
               (sha256
                (base32
                 "0x8ca6q1qdmk29lh12gj6ngvgn7kp79w42rxfgwrpxm9jmjqs4y9"))))
+    (arguments
+     (substitute-keyword-arguments (package-arguments guile-2.2)
+       ;; XXX: On ARMv7, work around <https://bugs.gnu.org/39208> by disabling
+       ;; JIT.
+       ((#:configure-flags flags '())
+        (if (target-arm32?)
+            `(cons "--disable-jit" ,flags)
+            flags))))
     (native-search-paths
      (list (search-path-specification
             (variable "GUILE_LOAD_PATH")
-- 
cgit v1.2.3