[bug#63766] [PATCH 0/4] Image for HiFive Unmatched

[Ludovic Courtès]

Efraim Flashner <efraim@flashner.co.il> skribis:

> * gnu/build/image.scm (make-unformatted-image): New procedure.
> (make-partition-image): Add support for unformatted partition.
> * gnu/system/image.scm (system-disk-image)[partition->gpt-type]: Add
> case for using unformatted partition uuid.
> [partition-image]: Add coreutils to image-builder closure.

[...]

> +(define* (make-unformatted-image partition target)
> +  "Make an unformatted partition of a certain size."
> +  (let ((size (partition-size partition)))
> +    (invoke "truncate" "--size" (number->string size) target)))

Simply: (truncate-file target size).

> -                     (inputs '#+(list e2fsprogs fakeroot dosfstools mtools))
> +                     (inputs '#+(list e2fsprogs     ; ext2/3/4
> +                                      fakeroot
> +                                      dosfstools    ; vfat
> +                                      mtools        ; vfat
> +                                      coreutils))   ; truncate

And this can be dropped.

Ludo’.