From 8f9fd9b70c7bf166d96a4b1dc8b427f8cdf040b5 Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Mon, 15 Mar 2021 23:31:58 +0100 Subject: gnu: r-biocparallel: Build reproducibly. * gnu/packages/bioconductor.scm (r-biocparallel)[arguments]: Add phase "make-reproducible". --- gnu/packages/bioconductor.scm | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) (limited to 'gnu/packages/bioconductor.scm') diff --git a/gnu/packages/bioconductor.scm b/gnu/packages/bioconductor.scm index 9212165706..166d30be0f 100644 --- a/gnu/packages/bioconductor.scm +++ b/gnu/packages/bioconductor.scm @@ -1705,6 +1705,34 @@ (define-public r-biocparallel (properties `((upstream-name . "BiocParallel"))) (build-system r-build-system) + (arguments + `(#:phases + (modify-phases %standard-phases + (add-after 'unpack 'make-reproducible + (lambda _ + ;; Remove generated documentation. + (for-each delete-file + '("inst/doc/BiocParallel_BatchtoolsParam.pdf" + "inst/doc/Introduction_To_BiocParallel.pdf" + "inst/doc/Errors_Logs_And_Debugging.pdf" + "inst/doc/BiocParallel_BatchtoolsParam.R" + "inst/doc/Introduction_To_BiocParallel.R" + "inst/doc/Errors_Logs_And_Debugging.R")) + + ;; Remove time-dependent macro + (substitute* '("inst/doc/BiocParallel_BatchtoolsParam.Rnw" + "inst/doc/Introduction_To_BiocParallel.Rnw" + "inst/doc/Errors_Logs_And_Debugging.Rnw" + "vignettes/BiocParallel_BatchtoolsParam.Rnw" + "vignettes/Introduction_To_BiocParallel.Rnw" + "vignettes/Errors_Logs_And_Debugging.Rnw") + (("\\today") "later")) + + ;; Initialize the random number generator seed when building. + (substitute* "R/internal_rng_stream.R" + (("\"L'Ecuyer-CMRG\"\\)" m) + (string-append + m "; if (!is.na(Sys.getenv(\"SOURCE_DATE_EPOCH\"))) {set.seed(100)}\n")))))))) (propagated-inputs `(("r-futile-logger" ,r-futile-logger) ("r-snow" ,r-snow) -- cgit v1.2.3