02/02: gnu: skalibs: Build reproducibly.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit 0e4d822e3fccd1bb360924ed4dba42f5b16458ea
Author: Z. Ren <address@hidden>
Date:   Tue Aug 8 14:50:35 2017 +0800

    gnu: skalibs: Build reproducibly.
    
    * gnu/packages/skarnet.scm (skalibs)[arguments]: Add #:phases.
    
    Signed-off-by: Ludovic Courtès <address@hidden>
---
 gnu/packages/skarnet.scm | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/skarnet.scm b/gnu/packages/skarnet.scm
index 37e09d8..5a46b0d 100644
--- a/gnu/packages/skarnet.scm
+++ b/gnu/packages/skarnet.scm
@@ -1,6 +1,7 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2015 Claes Wallin <address@hidden>
 ;;; Copyright © 2016 Eric Le Bihan <address@hidden>
+;;; Copyright © 2017 Z. Ren <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -39,7 +40,16 @@
     (build-system gnu-build-system)
     (arguments
      '(#:configure-flags '("--enable-force-devr") ; do not analyze /dev/random
-       #:tests? #f)) ; no tests exist
+       #:tests? #f ; no tests exist
+       #:phases (modify-phases %standard-phases
+                  (add-after 'unpack 'reproducible
+                    (lambda _
+                      ;; Sort source files deterministically so that the *.a
+                      ;; and *.so files are reproducible.
+                      (substitute* "Makefile"
+                        (("\\$\\(ALL_SRCS:%.c=%.o\\)")
+                         "$(sort $(ALL_SRCS:%.c=%.o))"))
+                      #t)))))
     (home-page "http://skarnet.org/software/skalibs/";)
     (synopsis "Platform abstraction libraries for skarnet.org software")
     (description