From 4d4a054ea1d191c561c9de171a789c5db939fd1d Mon Sep 17 00:00:00 2001
From: Efraim Flashner
Date: Tue, 16 Nov 2021 20:52:57 +0200
Subject: gn: metaeuk: enable tests.

---
 gn/packages/bioinformatics.scm | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/gn/packages/bioinformatics.scm b/gn/packages/bioinformatics.scm
index dc1ff65..8d4edaa 100644
--- a/gn/packages/bioinformatics.scm
+++ b/gn/packages/bioinformatics.scm
@@ -2476,7 +2476,6 @@ of similar contiguity and accuracy to other de Bruijn assemblers (e.g. Velvet)."
     (arguments
      `(#:configure-flags '("-DUSE_SYSTEM_ZSTD=YES")
        #:substitutable? #f      ; We want the native build.
-       #:tests? #f              ; TODO
        #:phases
        (modify-phases %standard-phases
          (add-after 'unpack 'use-shared-libraries
@@ -2490,13 +2489,20 @@ of similar contiguity and accuracy to other de Bruijn assemblers (e.g. Velvet)."
                 (string-append (assoc-ref inputs "xxhash") "/include"))
                (("lib/simde")
                 (string-append (assoc-ref inputs "simde") "/include/simde")))
-             #t)))))
+             #t))
+         (replace 'check
+           (lambda* (#:key tests? #:allow-other-keys)
+             (when tests?
+               (with-directory-excursion
+                 (string-append "../" ,name "-" ,version "-checkout/tests")
+                 (invoke "./run.sh" "../../build/src/metaeuk"))))))))
     (inputs
      `(("bzip2" ,bzip2)
        ("zlib" ,zlib)
        ("zstd:lib" ,zstd "lib")))
     (native-inputs
      `(;("gzstream" ,gzstream)
+       ("perl" ,perl)
        ("simde" ,simde)
        ("xxd" ,xxd)
        ("xxhash" ,xxhash)))
-- 
cgit v1.2.3