01/01: gnu: openfoam: Adjust for glibc 2.28.

[guix-commits]

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

commit 886d833e39fe5a193abaf486e64d8f35ac491b27
Author: Ludovic Courtès <address@hidden>
Date:   Sun Dec 2 00:20:04 2018 +0100

    gnu: openfoam: Adjust for glibc 2.28.
    
    * gnu/packages/simulation.scm (openfoam)[source](modules, snippet): New
    fields.
---
 gnu/packages/simulation.scm | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/simulation.scm b/gnu/packages/simulation.scm
index 6144e23..c080a16 100644
--- a/gnu/packages/simulation.scm
+++ b/gnu/packages/simulation.scm
@@ -70,7 +70,16 @@
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "0cgxh4h2hf50qbvvdg5miwc2nympb0nrv3md96vb3gbs9vk8vq9d"))
-       (patches (search-patches "openfoam-4.1-cleanup.patch"))))
+       (patches (search-patches "openfoam-4.1-cleanup.patch"))
+       (modules '((guix build utils)))
+       (snippet
+        '(begin
+           ;; Include <sys/sysmacros.h>, which is where glibc >= 2.28 provides
+           ;; 'major' and 'minor'.
+           (substitute* "src/OSspecific/POSIX/fileStat.C"
+             (("#include <unistd\\.h>")
+              "#include <unistd.h>\n#include <sys/sysmacros.h>\n"))
+           #t))))
     (build-system gnu-build-system)
     (inputs
      `(("boost" ,boost)