01/01: gnu: jack-2: Fix build by patching fast_rand.

[Ricardo Wurmus]

rekado pushed a commit to branch core-updates
in repository guix.

commit 56f76b08be97549dcc409b090186103413dc4e4b
Author: Ricardo Wurmus <address@hidden>
Date:   Thu Mar 16 09:41:20 2017 +0100

    gnu: jack-2: Fix build by patching fast_rand.
    
    * gnu/packages/audio.scm (jack-2)[arguments]: Add phase "patch-fast_rand" to
    apply upstream fixes.
---
 gnu/packages/audio.scm | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/gnu/packages/audio.scm b/gnu/packages/audio.scm
index 2b11a32..29b4718 100644
--- a/gnu/packages/audio.scm
+++ b/gnu/packages/audio.scm
@@ -1286,6 +1286,15 @@ synchronous execution of all clients, and low latency 
operation.")
                            "--alsa")
        #:phases
        (modify-phases %standard-phases
+         (add-after 'unpack 'patch-fast_rand
+           (lambda _
+             (substitute* "common/memops.c"
+               ;; Fixed in upstream commit 
d3c8e2d8d78899fba40a3e677ed4dbe388d82269
+               (("^inline unsigned int fast_rand" line)
+                (string-append "static " line))
+               ;; Fixed in upstream commit 
0279a2d65a36d1378f5bab56d95bf9e99cc8cefb
+               ((" 96314165") " 196314165"))
+             #t))
          (add-before
           'configure 'set-linkflags
           (lambda _