~ruther/guix-local: gnu: bedtools-2.18: Fix build with newer toolchain.

d54a4285ea92f899ad5a0309de9215447139fe5f — Ricardo Wurmus 4 years ago 3c3d7f0

gnu: bedtools-2.18: Fix build with newer toolchain.

* gnu/packages/bioinformatics.scm (bedtools-2.18)[arguments]: Add phase
'compatibility, fixing syntax quirks that are problematic with newer
toolchains.
[native-inputs]: Do not inherit.
[inherit]: Do not inherit.

patch browse .tar.gz .zip

1 files changed, 14 insertions(+), 2 deletions(-)

M gnu/packages/bioinformatics.scm

M gnu/packages/bioinformatics.scm => gnu/packages/bioinformatics.scm +14 -2

@@ 544,14 544,26 @@ BED, GFF/GTF, VCF.")
      '(#:test-target "test"
        #:phases
        (modify-phases %standard-phases
+         (add-after 'unpack 'compatibility
+           (lambda _
+             (substitute* "src/utils/fileType/FileRecordTypeChecker.h"
+               (("static const float PERCENTAGE")
+                "static constexpr float PERCENTAGE"))
+             (substitute* "src/utils/general/DualQueue.h"
+               (("template <class T, template<class T> class CompareFunc>")
+                "template <class T, template<class U> class CompareFunc>"))))
          (delete 'configure)
          (replace 'install
            (lambda* (#:key outputs #:allow-other-keys)
              (let ((bin (string-append (assoc-ref outputs "out") "/bin/")))
                (for-each (lambda (file)
                            (install-file file bin))
-                         (find-files "bin" ".*")))
-             #t)))))))
+                         (find-files "bin" ".*"))))))))
+    (native-inputs
+     `(("python" ,python-wrapper)))
+    (inputs
+     `(("samtools" ,samtools)
+       ("zlib" ,zlib)))))
 
 (define-public pbbam
   (package