[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
branch master updated: system: image: Introduce arm32-raw image type.
From: |
guix-commits |
Subject: |
branch master updated: system: image: Introduce arm32-raw image type. |
Date: |
Mon, 02 Nov 2020 11:18:02 -0500 |
This is an automated email from the git hooks/post-receive script.
mothacehe pushed a commit to branch master
in repository guix.
The following commit(s) were added to refs/heads/master by this push:
new c045801 system: image: Introduce arm32-raw image type.
c045801 is described below
commit c0458011174ece1871ed980b07a092615e1a5d3d
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Mon Nov 2 17:16:05 2020 +0100
system: image: Introduce arm32-raw image type.
* gnu/system/image.scm (arm32-disk-image, arm32-image-type): New variables.
(arm64-disk-image): Inherit from arm32-disk-image.
(arm64-image-type): Change name to 'arm64-raw.
---
gnu/system/image.scm | 18 +++++++++++++++---
1 file changed, 15 insertions(+), 3 deletions(-)
diff --git a/gnu/system/image.scm b/gnu/system/image.scm
index bc6610b..31bd110 100644
--- a/gnu/system/image.scm
+++ b/gnu/system/image.scm
@@ -66,6 +66,7 @@
efi-disk-image
iso9660-image
+ arm32-disk-image
arm64-disk-image
image-with-os
@@ -73,6 +74,7 @@
qcow2-image-type
iso-image-type
uncompressed-iso-image-type
+ arm32-image-type
arm64-image-type
image-with-label
@@ -126,10 +128,10 @@
(label "GUIX_IMAGE")
(flags '(boot)))))))
-(define arm64-disk-image
+(define arm32-disk-image
(image
(format 'disk-image)
- (target "aarch64-linux-gnu")
+ (target "arm-linux-gnueabihf")
(partitions
(list (partition
(inherit root-partition)
@@ -138,6 +140,11 @@
;; fails.
(volatile-root? #f)))
+(define arm64-disk-image
+ (image
+ (inherit arm32-disk-image)
+ (target "aarch64-linux-gnu")))
+
;;;
;;; Images types.
@@ -179,9 +186,14 @@ set to the given OS."
(compression? #f))
<>))))
+(define arm32-image-type
+ (image-type
+ (name 'arm32-raw)
+ (constructor (cut image-with-os arm32-disk-image <>))))
+
(define arm64-image-type
(image-type
- (name 'arm)
+ (name 'arm64-raw)
(constructor (cut image-with-os arm64-disk-image <>))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- branch master updated: system: image: Introduce arm32-raw image type.,
guix-commits <=