tribes/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 13:10:33 +02:00
Code Activity

teams: rust: Limit manifests to supported packages.

Browse Source 
* etc/teams/rust/rust-manifest.scm, etc/teams/rust/rusty-packages.scm:
Limit the manifests to packages which are supported on that
architecture.

Change-Id: I85b6f2a81835c961e9d320e94141eb273e99f9ba
This commit is contained in:
Efraim Flashner
2026-02-16 10:50:23 +02:00
committed by Andreas Enge
parent a1cc83b386
commit 1ccb1cc14e
2 changed files with 21 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
etc/teams/rust/rust-manifest.scm
View File

@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2024 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2024, 2026 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -27,8 +27,9 @@
(map package->manifest-entry
(fold-packages
(lambda (package lst)
(if (eq? (build-system-name (package-build-system package))
(if (and (eq? (build-system-name (package-build-system package))
(quote cargo))
(supported-package? package))
(cons package lst)
lst))
(list))))

15
etc/teams/rust/rusty-packages.scm
View File

@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2024 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2024, 2026 Efraim Flashner <efraim@flashner.co.il>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -17,10 +17,9 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
;;; This file returns a manifest of packages built using the cargo-build-system
;;; which are NOT prefixed with 'rust-' and the packages which use rust itself
;;; as an input. This is a short list of packages which can be checked to see
;;; if a rust update has gone smoothly. It is used to assist continuous
;;; integration of the rust-team branch.
;;; and the packages which use rust itself as an input. This is a short list of
;;; packages which can be checked to see if a rust update has gone smoothly. It
;;; is used to assist continuous integration of the rust-team branch.
(use-modules (guix packages)
(guix profiles)
@@ -31,15 +30,15 @@
(map package->manifest-entry
(fold-packages
(lambda (package lst)
(if (or
(eq? (build-system-name (package-build-system package))
(if (and (supported-package? package)
(or (eq? (build-system-name (package-build-system package))
(quote cargo))
(any
(lambda (pkg)
(member (specification->package "rust") pkg))
(append (package-native-inputs package)
(package-propagated-inputs package)
(package-inputs package))))
(package-inputs package)))))
(cons package lst)
lst))
(list))))