[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
04/05: build-system/gnu: Optimize the package graph.
From: |
guix-commits |
Subject: |
04/05: build-system/gnu: Optimize the package graph. |
Date: |
Sun, 29 Mar 2020 17:20:38 -0400 (EDT) |
civodul pushed a commit to branch master
in repository guix.
commit 5a17b9b673c9509ac31401fa60aa0a010656e8ac
Author: Ludovic Courtès <address@hidden>
AuthorDate: Sun Mar 29 18:42:10 2020 +0200
build-system/gnu: Optimize the package graph.
With this change, the output of:
guix graph -e '(@@ (gnu packages commencement) coreutils-final)' |grep
'label = ' | wc -l
drops from 76 nodes to 68 nodes, and the "add-data-to-store-cache" hit
rate for:
guix build libreoffice -d --no-grafts
drops from 3.9% to 2.6%.
* guix/build-system/gnu.scm (package-with-explicit-inputs*)[cut?]:
Adjust condition to exclude packages with build systems other than
GNU-BUILD-SYSTEM, such as 'ld-wrapper-boot3'.
---
guix/build-system/gnu.scm | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/guix/build-system/gnu.scm b/guix/build-system/gnu.scm
index 3cc89f8..7266fa0 100644
--- a/guix/build-system/gnu.scm
+++ b/guix/build-system/gnu.scm
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2012, 2013, 2014, 2015, 2016, 2017, 2019 Ludovic Courtès
<address@hidden>
+;;; Copyright © 2012, 2013, 2014, 2015, 2016, 2017, 2019, 2020 Ludovic Courtès
<address@hidden>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -151,8 +151,8 @@ so that they use INPUTS (a thunk) instead of implicit
inputs."
p))
(define (cut? p)
- (and (eq? (package-build-system p) gnu-build-system)
- (memq #:implicit-inputs? (package-arguments p))))
+ (or (not (eq? (package-build-system p) gnu-build-system))
+ (memq #:implicit-inputs? (package-arguments p))))
(package-mapping add-explicit-inputs cut?))