mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-19 05:57:04 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

derivations: Use a set for 'substitution-oracle'.

Browse source 
* guix/derivations.scm (substitution-oracle): Use sets instead of lists.
This commit is contained in:
Ludovic Courtès 2015-01-11 23:20:57 +01:00
parent ed3592a980
commit c06d140c03
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
guix/derivations.scm
View file

@ -217,8 +217,8 @@ (define* (substitution-oracle store drv)
(append self deps result)))
'()
drv)))
(subst (substitutable-paths store paths)))
(cut member <> subst)))
(subst (list->set (substitutable-paths store paths))))
(cut set-contains? subst <>)))
(define* (derivation-prerequisites-to-build store drv
#:key