03/13: gnu: bristol: Pass -fcommon.

[guix-commits]

rekado pushed a commit to branch master
in repository guix.

commit 6f66df9153d5df11a12efcf6dafcb3ef40492da8
Author: Ricardo Wurmus <rekado@elephly.net>
AuthorDate: Tue Feb 7 19:47:48 2023 +0100

    gnu: bristol: Pass -fcommon.
    
    * gnu/packages/music.scm (bristol)[arguments]: Add build phase 'add-fcommon.
---
 gnu/packages/music.scm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm
index d870e4016a..ec500a2d17 100644
--- a/gnu/packages/music.scm
+++ b/gnu/packages/music.scm
@@ -2613,6 +2613,10 @@ Laurens Hammond and Don Leslie.")
                             (string-prefix? "i686" system)))
                (substitute* "bristol/Makefile.in"
                  (("-msse -mfpmath=sse") "")))))
+         ;; This is needed to build brighton
+         (add-after 'unpack 'add-fcommon
+           (lambda _
+             (setenv "CFLAGS" "-fcommon")))
          ;; alsa-lib 1.1.x no longer provides iatomic.h.  That's okay because
          ;; bristol actually doesn't use it.
          (add-after 'unpack 'do-not-use-alsa-iatomic