From 7f3ccc5bdbab469351f3ba08903bfe64cece034e Mon Sep 17 00:00:00 2001
From: Efraim Flashner <efraim@flashner.co.il>
Date: Thu, 5 Aug 2021 13:44:23 +0300
Subject: [PATCH] gnu: julia: Fix building on aarch64-linux.

* gnu/packages/julia.scm (julia)[arguments]: Add phase on aarch64-linux
to skip linking to nonexistant libquadmath.
---
 gnu/packages/julia.scm | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/gnu/packages/julia.scm b/gnu/packages/julia.scm
index 6045c16b8f..4d739c8434 100644
--- a/gnu/packages/julia.scm
+++ b/gnu/packages/julia.scm
@@ -341,6 +341,19 @@ (define-public julia
                (("\\$\\$\\(build_depsbindir\\)/libwhich")
                 (string-append (assoc-ref inputs "libwhich") "/bin/libwhich")))
              #t))
+         ;; For some reason libquadmath is unavailable on this architecture.
+         ;; https://github.com/JuliaLang/julia/issues/41613
+         ,@(if (target-aarch64?)
+             '((add-after 'unpack 'drop-libquadmath-on-aarch64
+                 (lambda _
+                   (substitute* '("contrib/fixup-libgfortran.sh"
+                                  "deps/csl.mk"
+                                  "base/Makefile")
+                     ((".*libquadmath.*") ""))
+                   (substitute* "Makefile"
+                     (("libquadmath ") ""))
+                   #t)))
+             '())
          (add-before 'check 'set-home
            ;; Some tests require a home directory to be set.
            (lambda _ (setenv "HOME" "/tmp") #t))