summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2025-07-14 18:40:54 +0200
committerLudovic Courtès <ludo@gnu.org>2025-07-18 00:43:51 +0200
commit951e39718a00cf3f91e8c8d4b4b5661715a27416 (patch)
treecda9b57a631d8f9bca899a2efd0227c5098b1440
parentbf79804508b04b95333478f1533f0b2dcb05f8ec (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.scm23
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"))))