~ruther/guix-local

31d372cd8a727008a2205e428d50d0e160659066 — Ricardo Wurmus 4 years ago 32d5fb0
gnu: khmer: Fix build with Python 3.8.

* gnu/packages/bioinformatics.scm (khmer)[source]: Remove trailing #T.
[arguments]: Remove trailing #T from build phases; add build phase
'python-3.8-compatibility.
1 files changed, 9 insertions(+), 6 deletions(-)

M gnu/packages/bioinformatics.scm
M gnu/packages/bioinformatics.scm => gnu/packages/bioinformatics.scm +9 -6
@@ 5040,23 5040,26 @@ command, or queried for specific k-mers with @code{jellyfish query}.")
             (("# libraries = z,bz2")
              "libraries = z,bz2")
             (("include:third-party/zlib:third-party/bzip2")
              "include:"))
           #t))))
              "include:"))))))
    (build-system python-build-system)
    (arguments
     `(#:phases
       (modify-phases %standard-phases
         (add-after 'unpack 'set-cc
           (lambda _ (setenv "CC" "gcc") #t))

           (lambda _ (setenv "CC" "gcc")))
         (add-after 'unpack 'python-3.8-compatibility
           (lambda _
             ;; Python 3.8 removed time.clock().
             (substitute* "sandbox/sweep-reads.py"
               (("time\\.clock")
                "time.process_time"))))
         (add-before 'reset-gzip-timestamps 'make-files-writable
           (lambda* (#:key outputs #:allow-other-keys)
             ;; Make sure .gz files are writable so that the
             ;; 'reset-gzip-timestamps' phase can do its work.
             (let ((out (assoc-ref outputs "out")))
               (for-each make-file-writable
                         (find-files out "\\.gz$"))
               #t))))))
                         (find-files out "\\.gz$"))))))))
    (native-inputs
     `(("python-cython" ,python-cython)
       ("python-pytest" ,python-pytest)