From 807ec6a324052c3e91a68be85f137d886b6cae5f Mon Sep 17 00:00:00 2001
From: Sharlatan Hellseher <sharlatanus@gmail.com>
Date: Fri, 11 Jul 2025 15:48:21 +0100
Subject: [PATCH] gnu: python-pyliblo3: Fix build.

* gnu/packages/audio.scm (python-pyliblo3):
  [arguments] <test-backend>: Use custom.
  <phases>: Add 'fix-compilation.

Change-Id: Ie188c8038c239db94871593f0dfbf6e3b0ea899e
---
 gnu/packages/audio.scm | 21 +++++++++++++++++++--
 1 file changed, 19 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/audio.scm b/gnu/packages/audio.scm
index 3ac39cbdb9dc60e60340d1acff229e3f6aa2b5a3..44d6639600b3370bf416f21ed43d0f4c4fd1bd36 100644
--- a/gnu/packages/audio.scm
+++ b/gnu/packages/audio.scm
@@ -3618,8 +3618,25 @@ included are the command line utilities @code{send_osc} and @code{dump_osc}.")
               (base32
                "1rr2m8jxa5yxyb3pw6h93kvdxg7x0m6sxxxvgn34vq8k8mg1kz21"))))
     (build-system pyproject-build-system)
-    (native-inputs (list python-cython python-setuptools python-wheel))
-    (inputs (list liblo))
+    (arguments
+     (list
+      #:test-backend #~'custom
+      #:test-flags #~(list "test/unit.py")
+      #:phases
+      #~(modify-phases %standard-phases
+          ;; long is not available and replaced by int, proposed in
+          ;; <https://github.com/gesellkammer/pyliblo3/pull/15>.
+          (add-after 'unpack 'fix-compilation
+            (lambda _
+              (substitute* "pyliblo3/_liblo.pyx"
+                (("long\\(") "int(")
+                ((", long") "")))))))
+    (native-inputs
+     (list python-cython
+           python-setuptools
+           python-wheel))
+    (inputs
+     (list liblo))
     (home-page "https://github.com/gesellkammer/pyliblo3")
     (synopsis "Python bindings for liblo")
     (description