02/04: gnu: hdf5: Avoid unneeded store references to compilers.

[Thomas Danckaert]

thomasd pushed a commit to branch master
in repository guix.

commit fd0378a1475900bdbd1da43066811677ba41f3ea
Author: Thomas Danckaert <address@hidden>
Date:   Thu Aug 31 17:29:36 2017 +0200

    gnu: hdf5: Avoid unneeded store references to compilers.
    
    * gnu/packages/maths.scm (hdf5) [arguments]: Add phase to patch
      "libhdf5.settings", removing references to the C/C++/Fortran compilers.
---
 gnu/packages/maths.scm | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/gnu/packages/maths.scm b/gnu/packages/maths.scm
index b561531..47e7ba3 100644
--- a/gnu/packages/maths.scm
+++ b/gnu/packages/maths.scm
@@ -673,6 +673,16 @@ incompatible with HDF5.")
                 (string-append "libhdf5hl_fortran_la_LDFLAGS = -Wl,-rpath="
                                (assoc-ref outputs "fortran") "/lib")))
              #t))
+         (add-after 'configure 'patch-settings
+           (lambda _
+             ;; libhdf5.settings contains the full path of the
+             ;; compilers used, and its contents are included in
+             ;; libhdf5.so.  We truncate the hashes to avoid
+             ;; unnecessary store references to those compilers:
+             (substitute* "src/libhdf5.settings"
+              (("(/gnu/store/)([a-Z0-9]*)" all prefix hash)
+               (string-append prefix (string-take hash 10) "...")))
+             #t))
          (add-after 'install 'patch-references
            (lambda* (#:key inputs outputs #:allow-other-keys)
              (let ((bin (string-append (assoc-ref outputs "out") "/bin"))