system: image: Do not offload image files.

Image files can be very large (multiple gigabytes), and the process of
generating them is primarily I/O bound. As disk access is typically faster
than network access, it makes sense build them locally.

* gnu/system/image.scm (system-disk-image): Pass the #:local-build? #t
parameter to computed-file calls dealing with generating image files.
(system-iso9660-image): Likewise.
This commit is contained in:
Maxim Cournoyer 2020-08-26 08:11:34 -04:00
parent ef5ddb0e17
commit 6a9581741e
No known key found for this signature in database
GPG Key ID: 1260E46482E63562

View File

@ -266,7 +266,8 @@ used in the image."
#$output
image-root)))))
(computed-file "partition.img" image-builder
#:options `(#:references-graphs ,inputs))))
#:options `(#:local-build? #t ;typically large file
#:references-graphs ,inputs))))
(define (partition->config partition)
;; Return the genimage partition configuration for PARTITION.
@ -324,7 +325,8 @@ image ~a {
#~(symlink
(string-append #$image-dir "/" #$genimage-name)
#$output)
#:options `(#:substitutable? ,substitutable?))))
#:options `(#:local-build? #t ;typically large file
#:substitutable? ,substitutable?))))
;;
@ -401,7 +403,8 @@ used in the image. "
#:volume-id #$root-label
#:volume-uuid #$root-uuid)))))
(computed-file name builder
#:options `(#:references-graphs ,inputs
#:options `(#:local-build? #t ;typically large file
#:references-graphs ,inputs
#:substitutable? ,substitutable?))))