summary refs log tree commit diff
path: root/gnu
diff options
context:
space:
mode:
authorEfraim Flashner <efraim@flashner.co.il>2017-06-15 10:17:08 +0300
committerEfraim Flashner <efraim@flashner.co.il>2017-06-15 10:31:44 +0300
commit2c9232ae698c66de0de0bc67251ed95f2bc79491 (patch)
tree97382b9879fd0def29f858f6bbaccc99a8fbe277 /gnu
parent9ffc1f0e95743171370e3999bd41eba9ebaada33 (diff)
downloadguix-2c9232ae698c66de0de0bc67251ed95f2bc79491.tar.gz
gnu: gemma: Fix building on 32-bit architectures.
* gnu/packages/bioinformatics.scm (gemma)[arguments]: On 32-bit
architectures add 'FORCE_32BIT' flag.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/bioinformatics.scm16
1 files changed, 12 insertions, 4 deletions
diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index b47f136935..21c4d098ad 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -97,7 +97,8 @@
   #:use-module (gnu packages xml)
   #:use-module (gnu packages xorg)
   #:use-module (gnu packages zip)
-  #:use-module (srfi srfi-1))
+  #:use-module (srfi srfi-1)
+  #:use-module (srfi srfi-26))
 
 (define-public r-ape
   (package
@@ -2718,19 +2719,26 @@ comment or quality sections.")
        ("zlib" ,zlib)))
     (build-system gnu-build-system)
     (arguments
-     `(#:make-flags '("FORCE_DYNAMIC=1") ; use shared libs
+     `(#:make-flags
+       '(,@(if (any (cute string-prefix? <> (or (%current-system)
+                                                (%current-target-system)))
+                    '("x86_64" "mips64el" "aarch64"))
+             '("FORCE_DYNAMIC=1") ; use shared libs
+             '("FORCE_DYNAMIC=1" "FORCE_32BIT=1")))
        #:phases
        (modify-phases %standard-phases
          (delete 'configure)
          (add-before 'build 'bin-mkdir
                      (lambda _
-                       (mkdir-p "bin")))
+                       (mkdir-p "bin")
+                       #t))
          (replace 'install
                   (lambda* (#:key outputs #:allow-other-keys)
                     (let ((out (assoc-ref outputs "out")))
                       (install-file "bin/gemma"
                                     (string-append
-                                     out "/bin"))))))
+                                     out "/bin")))
+                    #t)))
        #:tests? #f)) ; no tests included yet
     (home-page "https://github.com/xiangzhou/GEMMA")
     (synopsis "Tool for genome-wide efficient mixed model association")