06/09: gnu: petsc: Make header generation reproducible.

[Eric Bavier]

bavier pushed a commit to branch master
in repository guix.

commit b730b43770249f41dc7987b912cdc17df7035238
Author: Eric Bavier <address@hidden>
Date:   Fri Jul 8 10:29:02 2016 -0500

    gnu: petsc: Make header generation reproducible.
    
    * gnu/packages/maths.scm (petsc)[arguments]: Scrub timestamp from
      petscmachineinfo.h header.
---
 gnu/packages/maths.scm |    6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/maths.scm b/gnu/packages/maths.scm
index b3780fa..23bdb0d 100644
--- a/gnu/packages/maths.scm
+++ b/gnu/packages/maths.scm
@@ -842,11 +842,13 @@ ASCII text files using Gmsh's own scripting language.")
               (format #t "configure flags: ~s~%" flags)
               (zero? (apply system* "./configure" flags)))))
         (add-after 'configure 'clean-local-references
-          ;; Try to keep build directory names from leaking into compiled code
           (lambda* (#:key inputs outputs #:allow-other-keys)
             (let ((out (assoc-ref outputs "out")))
               (substitute* (find-files "." "^petsc(conf|machineinfo).h$")
-                (((getcwd)) out)))))
+                ;; Prevent build directory from leaking into compiled code
+                (((getcwd)) out)
+                ;; Scrub timestamp for reproducibility
+                ((".*Libraries compiled on.*") "")))))
         (add-after 'install 'clean-install
           ;; Try to keep installed files from leaking build directory names.
           (lambda* (#:key inputs outputs #:allow-other-keys)