diff options
| author | Mathieu Othacehe <othacehe@gnu.org> | 2020-10-06 09:50:55 +0200 |
|---|---|---|
| committer | Mathieu Othacehe <othacehe@gnu.org> | 2020-10-06 09:51:43 +0200 |
| commit | 8a4f1eef98490827b331460d7432de843926869b (patch) | |
| tree | 74143f22bb240038c396cb676bc55ec3c7f1a3de /gnu | |
| parent | c1cc0c4865a8bfff43c5c9bd6ae8dcadb061c8a0 (diff) | |
| download | guix-8a4f1eef98490827b331460d7432de843926869b.tar.gz | |
images: Add pine64-barebones-raw-image.
* gnu/system/images/pine64.scm (pine64-barebones-raw-image): New variable. * gnu/ci.scm (%guix-system-images): Add it.
Diffstat (limited to 'gnu')
| -rw-r--r-- | gnu/ci.scm | 4 | ||||
| -rw-r--r-- | gnu/system/images/pine64.scm | 9 |
2 files changed, 11 insertions, 2 deletions
diff --git a/gnu/ci.scm b/gnu/ci.scm index fc35be87b4..bf9952a450 100644 --- a/gnu/ci.scm +++ b/gnu/ci.scm @@ -56,6 +56,7 @@ #:use-module (gnu system vm) #:use-module (gnu system install) #:use-module (gnu system images hurd) + #:use-module (gnu system images pine64) #:use-module (gnu tests) #:use-module (srfi srfi-1) #:use-module (srfi srfi-26) @@ -203,7 +204,8 @@ SYSTEM." '("x86_64-linux" "i686-linux")) (define %guix-system-images - (list hurd-barebones-qcow2-image)) + (list hurd-barebones-qcow2-image + pine64-barebones-raw-image)) (define (image-jobs store system) "Return a list of jobs that build images for SYSTEM." diff --git a/gnu/system/images/pine64.scm b/gnu/system/images/pine64.scm index c738a77078..f0b0c3f50d 100644 --- a/gnu/system/images/pine64.scm +++ b/gnu/system/images/pine64.scm @@ -28,7 +28,8 @@ #:use-module (gnu system image) #:use-module (srfi srfi-26) #:export (pine64-barebones-os - pine64-image-type)) + pine64-image-type + pine64-barebones-raw-image)) (define pine64-barebones-os (operating-system @@ -57,3 +58,9 @@ (image-type (name 'pine64-raw) (constructor (cut image-with-os arm64-disk-image <>)))) + +(define pine64-barebones-raw-image + (image + (inherit + (os->image pine64-barebones-os #:type pine64-image-type)) + (name 'pine64-barebones-raw-image))) |