diff options
author | Ludovic Courtès <ludo@gnu.org> | 2019-01-20 22:59:28 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2019-01-20 23:54:54 +0100 |
commit | 54800977d9e234fa92f927496ca9f9e6ec050aca (patch) | |
tree | f9b05841b0db885d20588ed14cafd4d76b48fe25 | |
parent | 8e3e51df1136a3da5f331f340dd2c13197e7b499 (diff) |
self: Build the (gnu tests …) modules.
* guix/self.scm (compiled-guix)[*system-modules*]: Remove gnu/tests/*
from #:extra-files.
[*system-test-modules*]: New variable.
[build-modules]: Add them.
-rw-r--r-- | guix/self.scm | 15 |
1 files changed, 11 insertions, 4 deletions
diff --git a/guix/self.scm b/guix/self.scm index fa78015a41..f3679546f6 100644 --- a/guix/self.scm +++ b/guix/self.scm @@ -613,10 +613,6 @@ Info manual." (append (file-imports source "gnu/system/examples" (const #t)) - ;; Need so we get access system tests from an - ;; inferior. - (file-imports source "gnu/tests" (const #t)) - ;; All the installer code is on the build-side. (file-imports source "gnu/installer/" (const #t)) @@ -626,6 +622,16 @@ Info manual." #:guile-for-build guile-for-build)) + (define *system-test-modules* + ;; Ship these modules mostly so (gnu ci) can refer to them. + (scheme-node "guix-system-tests" + `((gnu tests) + ,@(scheme-modules* source "gnu/tests")) + (list *core-package-modules* *package-modules* + *extra-modules* *system-modules* *core-modules*) + #:extensions dependencies + #:guile-for-build guile-for-build)) + (define *cli-modules* (scheme-node "guix-cli" (append (scheme-modules* source "/guix/scripts") @@ -664,6 +670,7 @@ Info manual." ;; comes with *CORE-MODULES*. (list *config* *cli-modules* + *system-test-modules* *system-modules* *package-modules* *core-package-modules* |