inferior: Make sure test refers to guile@3.0.

* tests/inferior.scm ("inferior-package-inputs"): Compare with
GUILE-3.0-LATEST since that's what 'lookup-inferior-packages' returns.
This commit is contained in:
Ludovic Courtès 2021-04-29 00:57:08 +02:00
parent 524c9800af
commit 9dc1c591a4
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -173,9 +173,9 @@ (define result
,(package-version package) ,(package-version package)
,(package-location package)) ,(package-location package))
,@rest))))) ,@rest)))))
(list (map ->list (package-inputs guile-2.2)) (list (map ->list (package-inputs guile-3.0-latest))
(map ->list (package-native-inputs guile-2.2)) (map ->list (package-native-inputs guile-3.0-latest))
(map ->list (package-propagated-inputs guile-2.2)))) (map ->list (package-propagated-inputs guile-3.0-latest))))
(let* ((inferior (open-inferior %top-builddir (let* ((inferior (open-inferior %top-builddir
#:command "scripts/guix")) #:command "scripts/guix"))
(guile (first (lookup-inferior-packages inferior "guile"))) (guile (first (lookup-inferior-packages inferior "guile")))