From fc95b7f892f57cdc6af37befd5f39d69f6bb210f Mon Sep 17 00:00:00 2001
From: Raghav Gururajan <rg@raghavgururajan.name>
Date: Sat, 13 Mar 2021 14:55:03 -0500
Subject: [PATCH 09/50] gnu: bctoolbox: Enable tests.

* gnu/packages/linphone.scm (bctoolbox) [arguments]<#:tests?>: Remove argument.
<#:phases>['patch-source]: New phase.
['check]: Replace with custom phase.
---
 gnu/packages/linphone.scm | 18 +++++++++++++++---
 1 file changed, 15 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/linphone.scm b/gnu/packages/linphone.scm
index 90f5796c1f..9d54b1b874 100644
--- a/gnu/packages/linphone.scm
+++ b/gnu/packages/linphone.scm
@@ -147,9 +147,21 @@ administering, and running unit tests in C.")
         (base32 "0bfswwvvdshaahg4jd2j10f0sci8809s4khajd0m6b059zwc7y25"))))
     (build-system cmake-build-system)
     (arguments
-     '(#:tests? #f                      ; No test target
-       #:configure-flags
-       (list "-DENABLE_STATIC=OFF")))   ; Not required
+     `(#:configure-flags '("-DENABLE_STATIC=OFF")
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'patch-source
+           (lambda _
+             ;; Disable failing tests.
+             (substitute* "tester/port.c"
+               (("[ \t]*TEST_NO_TAG\\(\"Addrinfo sort\", bctbx_addrinfo_sort_test\\)")
+                ""))
+             #t))
+         (replace 'check
+           (lambda _
+             (with-directory-excursion "tester"
+               (invoke "./bctoolbox_tester"))
+             #t)))))
     (inputs
      `(("bcunit" ,bcunit)
        ("mbedtls" ,mbedtls-apache)))
-- 
2.31.0