diff options
author | Ludovic Courtès <ludo@gnu.org> | 2025-07-14 18:40:54 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2025-07-18 00:43:51 +0200 |
commit | 951e39718a00cf3f91e8c8d4b4b5661715a27416 (patch) | |
tree | cda9b57a631d8f9bca899a2efd0227c5098b1440 | |
parent | bf79804508b04b95333478f1533f0b2dcb05f8ec (diff) |
tests: foreign: Add ‘archlinux-install’ test.
* gnu/tests/foreign.scm (archlinux-qcow2, %test-archlinux-install): New
variables.
Co-authored-by: Ivan Popovych <ivan@ipvych.com>
Change-Id: I2fce962a2eafa58fafaf2bdff25fc23df28fd687
-rw-r--r-- | gnu/tests/foreign.scm | 23 |
1 files changed, 22 insertions, 1 deletions
diff --git a/gnu/tests/foreign.scm b/gnu/tests/foreign.scm index 0c321693fe..52ead49a24 100644 --- a/gnu/tests/foreign.scm +++ b/gnu/tests/foreign.scm @@ -38,7 +38,8 @@ #:use-module (gnu system vm) #:use-module ((guix scripts pack) #:prefix pack:) #:use-module (srfi srfi-9) - #:export (%test-debian-install)) + #:export (%test-debian-install + %test-archlinux-install)) (define marionette-systemd-service ;; Definition of the marionette service for systemd. @@ -289,3 +290,23 @@ partition of IMAGE is expected to be on DEVICE." "Test installation of Guix on Debian using the @file{guix-install.sh} script.") (value (run-foreign-install-test debian-12-qcow2 name)))) + +(define archlinux-qcow2 + ;; Images generated by <https://gitlab.archlinux.org/archlinux/arch-boxes>; + ;; using default mirror mentioned in README there. + ;; XXX: These images are removed every ~90 days + (origin + (uri "https://geo.mirror.pkgbuild.com/images/v20250615.366044/Arch-Linux-x86_64-basic.qcow2") + (method url-fetch) + (sha256 + (base32 + "11m945cv5hgfa7zgkvd7fqgqfp3vdq3c4bdh3x0ilza36w5xcn1b")))) + +(define %test-archlinux-install + (system-test + (name "archlinux-install") + (description + "Test installation of Guix on Arch Linux using the @file{guix-install.sh} +script.") + (value (run-foreign-install-test archlinux-qcow2 name + #:device "/dev/vdb3")))) |