02/05: compression: Enable zstd parallel compression.

[guix-commits]

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

commit d99544bee0477ebea2c7b069d8c3a884b6f3802f
Author: Maxim Cournoyer <maxim.cournoyer@gmail.com>
AuthorDate: Mon Jan 16 22:41:14 2023 -0500

    compression: Enable zstd parallel compression.
    
    * gnu/compression.scm (%compressors) [zstd]: Provide the --threads argument.
    
    Reviewed-by: Ludovic Courtès <ludo@gnu.org>
    Change-Id: I4e8dfe725d1b0721c0016c3013b9e609fee94367
---
 gnu/compression.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gnu/compression.scm b/gnu/compression.scm
index 0418e80a15..6e48de5979 100644
--- a/gnu/compression.scm
+++ b/gnu/compression.scm
@@ -56,7 +56,8 @@
                     ;; The default level 3 compresses better than gzip in a
                     ;; fraction of the time, while the highest level 19
                     ;; (de)compresses more slowly and worse than xz.
-                    #~(list #+(file-append zstd "/bin/zstd") "-3"))
+                    #~(list #+(file-append zstd "/bin/zstd") "-3"
+                            (format #f "--threads=~a" (parallel-job-count))))
         (compressor "none" "" #f)))
 
 (define (lookup-compressor name)