aboutsummaryrefslogtreecommitdiff
path: root/.guix/modules/gn-libs.scm
blob: 78b362b44933d9b4da53050e8cdcbfe36e0a1a6d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
(define-module (gn-libs)
  #:use-module ((gn packages genenetwork) #:select (gn-libs) #:prefix gn:)
  #:use-module ((gnu packages check) #:select (python-pylint))
  #:use-module ((gnu packages python-check) #:select (python-mypy))
  #:use-module (guix gexp)
  #:use-module (guix utils)
  #:use-module (guix packages)
  #:use-module (guix git-download))

(define %source-dir (dirname (dirname (current-source-directory))))

(define vcs-file?
  (or (git-predicate %source-dir)
      (const #t)))

(define-public gn-libs
  (package
    (inherit gn:gn-libs)
    (source
     (local-file "../.."
		 "gn-libs-checkout"
		 #:recursive? #t
		 #:select? vcs-file?))))

(define-public gn-libs-all-tests
  (package
    (inherit gn-libs)
    (arguments
     (substitute-keyword-arguments (package-arguments gn-libs)
       ((#:phases phases #~%standard-phases)
        #~(modify-phases #$phases
            (add-before 'build 'pylint
              (lambda _
                (invoke "pylint" "tests" "gn_libs")))
            (add-after 'pylint 'mypy
              (lambda _
                (invoke "mypy" "--show-erro-codes" ".")))))))
    (native-inputs
     (modify-inputs (package-native-inputs gn-libs)
       (prepend python-mypy)
       (prepend python-pylint)))))

gn-libs