diff options
author | Ludovic Courtès <ludo@gnu.org> | 2023-01-29 17:51:51 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2023-01-29 17:53:11 +0100 |
commit | 634f5f2d3d03be87dcffc81b8e652544a9c2cced (patch) | |
tree | 745fff34fab74494e2e3cf5e060c6808ae62fa25 /build-aux/manifest.scm | |
parent | 20938f2a9dc2ce7b6601311afb9a2fa146956ac0 (diff) | |
download | guile-wip-cuirass-ci.tar.gz |
maint: Add variants of the default package for Guix.wip-cuirass-ci
* build-aux/guix/guile-package.scm (package-with-configure-flags): New
procedure.
(guile-without-threads, guile-without-networking)
(guile-debug, guile-strict-typing): New variables.
* build-aux/manifest.scm: Use (guile-package) module instead of 'load'.
(native-builds): Add the variants above + "guile-clang".
Diffstat (limited to 'build-aux/manifest.scm')
-rw-r--r-- | build-aux/manifest.scm | 30 |
1 files changed, 21 insertions, 9 deletions
diff --git a/build-aux/manifest.scm b/build-aux/manifest.scm index 5699f80f4..0a25b2925 100644 --- a/build-aux/manifest.scm +++ b/build-aux/manifest.scm @@ -19,10 +19,8 @@ ;; integration service running at <https://ci.guix.gnu.org>. (use-modules (guix) - (guix profiles)) - -(define guile - (load "../guix.scm")) + (guix profiles) + (guile-package)) (define* (package->manifest-entry* package system #:key target) @@ -40,11 +38,25 @@ TARGET." (define native-builds (manifest - (map (lambda (system) - (package->manifest-entry* guile system)) - '("x86_64-linux" "i686-linux" - "aarch64-linux" "armhf-linux" - "powerpc64le-linux")))) + (append (map (lambda (system) + (package->manifest-entry* guile system)) + + '("x86_64-linux" "i686-linux" + "aarch64-linux" "armhf-linux" + "powerpc64le-linux")) + (map (lambda (guile) + (package->manifest-entry* guile "x86_64-linux")) + (cons (package + (inherit (package-with-c-toolchain + guile + `(("clang-toolchain" + ,(specification->package + "clang-toolchain"))))) + (name "guile-clang")) + (list guile-without-threads + guile-without-networking + guile-debug + guile-strict-typing)))))) (define cross-builds (manifest |