gnu: mono@1.2.6: Fix build with gcc 14.

* gnu/packages/dotnet.scm (mono-1.2.6)[make-flags]: Adjust CFLAGS.
[arguments]<#:phases>[fix-includes]: New phase.
[set-env]: Adjust CFLAGS.

Change-Id: I21a01367e6e95c1de9c5cda69d5ffe00775fe253

1 files changed, 10 insertions, 1 deletions

diff --git a/gnu/packages/dotnet.scm b/gnu/packages/dotnet.scm
index 45e8f851346..c361f7308f7 100644
--- a/gnu/packages/dotnet.scm
+++ b/gnu/packages/dotnet.scm
@@ -366,15 +366,24 @@ for use with .NET-capable runtime engines and applications.")
                            (string-append "EXTERNAL_RUNTIME="
                                           #+(this-package-native-input "pnet-git")
                                           "/bin/ilrun")
-                           "CFLAGS=-O2 -g -DARG_MAX=500"
+                           "CFLAGS=-O2 -g -DARG_MAX=500 -Wno-error=implicit-function-declaration -Wno-error=incompatible-pointer-types -Wno-error=implicit-int -Wno-error=return-mismatch"
                            #$(string-append "CC=" (cc-for-target))
                            "V=1")
       ;; build fails nondeterministically without this
       #:parallel-build? #f
       #:phases
       #~(modify-phases %standard-phases
+          (add-after 'unpack 'fix-includes
+            (lambda _
+              ;; Upstream forgot to #include that.
+              (substitute* "mono/metadata/security.c"
+               (("#include <mono/metadata/image.h>")
+                "#include <mono/metadata/image.h>
+#include <mono/metadata/assembly.h>"))))
           (add-after 'unpack 'set-env
             (lambda _
+              ;; Configure script for sock_un.sun_path uses exit() without importing it.
+              (setenv "CFLAGS" "-O2 -g -DARG_MAX=500 -Wno-error=implicit-function-declaration -Wno-error=incompatible-pointer-types -Wno-error=implicit-int -Wno-error=return-mismatch")
               ;; All tests under mcs/class fail trying to access $HOME
               (setenv "HOME" "/tmp")
               ;; ZIP files have "DOS time" which starts in Jan 1980.