mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 15:36:20 -05:00
tests: Add 'guile-final' to the installation test GC roots.
* gnu/tests/install.scm (run-install): Add GUILE-FINAL to OPERATING-SYSTEM-WITH-GC-ROOTS.
This commit is contained in:
parent
d2fc76462e
commit
0e72d49ef7
1 changed files with 4 additions and 2 deletions
|
@ -29,6 +29,7 @@ (define-module (gnu tests install)
|
|||
#:use-module ((gnu build vm) #:select (qemu-command))
|
||||
#:use-module (gnu packages admin)
|
||||
#:use-module (gnu packages bootloaders)
|
||||
#:use-module (gnu packages commencement) ;for 'guile-final'
|
||||
#:use-module (gnu packages cryptsetup)
|
||||
#:use-module (gnu packages linux)
|
||||
#:use-module (gnu packages ocr)
|
||||
|
@ -226,10 +227,11 @@ (define* (run-install target-os target-os-source
|
|||
;; Since the installation system has no network access,
|
||||
;; we cheat a little bit by adding TARGET to its GC
|
||||
;; roots. This way, we know 'guix system init' will
|
||||
;; succeed.
|
||||
;; succeed. Also add guile-final, which is pulled in
|
||||
;; through provenance.drv and may not always be present.
|
||||
(image (system-disk-image
|
||||
(operating-system-with-gc-roots
|
||||
os (list target))
|
||||
os (list target guile-final))
|
||||
#:disk-image-size install-size
|
||||
#:file-system-type
|
||||
installation-disk-image-file-system-type
|
||||
|
|
Loading…
Reference in a new issue