cbaines/guix-data-service
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Pass #:store to checkers that support it

Browse source 
The derivation checker currently opens a store connection on its own, but by
passing the already open connection in, it won't have to do that, and
hopefully this will make checking all the packages faster.
This commit is contained in:
Christopher Baines 2020-03-24 21:36:13 +00:00
parent ca0d3ee754
commit 994318782a
1 changed files with 9 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

10
guix-data-service/jobs/load-new-guix-revision.scm
View file

@ -347,6 +347,10 @@ WHERE job_id = $1"
%local-checkers)) %local-checkers))
(check (lint-checker-check checker))) (check (lint-checker-check checker)))
(define lint-checker-requires-store?-defined?
(defined? 'lint-checker-requires-store?
(resolve-module '(guix lint))))
(define (process-lint-warning lint-warning) (define (process-lint-warning lint-warning)
(list (list
(match (lint-warning-location lint-warning) (match (lint-warning-location lint-warning)
@ -397,7 +401,11 @@ WHERE job_id = $1"
(cons (cons
package-id package-id
(map process-lint-warning (map process-lint-warning
(check package)))) (if (and lint-checker-requires-store?-defined?
(lint-checker-requires-store? checker))
(check package #:store store)
(check package)))))
%package-table))))) %package-table)))))
(and (and