Coverage report: /home/ellis/comp/core/lib/vc/pkg.lisp

KindCoveredAll%
expression06 0.0
branch00nil
Key
Not instrumented
Conditionalized out
Executed
Not executed
 
Both branches taken
One branch taken
Neither branch taken
1
 ;;; vc/pkg.lisp --- Version Control Packages
2
 
3
 ;;; Code:
4
 (defpackage :vc/proto
5
   (:use :cl :std :log :parse/lex :dat/sxp :obj :config)
6
   (:export 
7
    :vc-repo
8
    :vc-run
9
    :vc-path
10
    :vc-head
11
    :vc-name
12
    :vc-bundle :vc-unbundle
13
    :vc-error :vc-status
14
    :vc-clone :vc-push :vc-pull :vc-commit
15
    :vc-init :vc-id :vc-add :vc-remove
16
    :vc-addremove :vc-diff
17
    :vc-branch :repo
18
    :vc-meta :find-repo
19
    :vc-export
20
    :make-repo :register-repo
21
    :vc-update
22
    :vc-ignore
23
    :vc-remotes
24
    :make-vc-remote
25
    :vc-designator
26
    :vc-type
27
    :*repo*
28
    :*default-vc-kind*
29
    :*repo-roots*
30
    :*repo-registry*
31
    :*repo-auto-register*
32
    :vc-remote
33
    :vc-submodule
34
    :vc-submodules
35
    :vc-config
36
    :find-repo-root))
37
 
38
 (defpackage :vc/git
39
   (:use :cl :std :cli :vc/proto :config)
40
   (:export :*git-program* 
41
    :git-repo :git-error 
42
    :run-git-command :git-meta :gitignore :make-git-repo))
43
 
44
 (defpackage :vc/hg
45
   (:use :cl :std :cli :sb-bsd-sockets :vc/proto :config :dat/toml :ast :uri)
46
   (:import-from :vc/git :run-git-command)
47
   (:export :*hg-program* 
48
    :hg-repo :hg-error 
49
    :run-hg-command :hg-meta 
50
    :make-hg-client :hg-client :hgignore
51
    :hg-bundle-type
52
    :hg-compression-engine
53
    :*hg-bundlespec-options*
54
    :hg-bundlespec-string-p
55
    :hg-config
56
    :*hg-fast-export-script*
57
    :hg-fast-export
58
    :find-hgrc
59
    :make-hg-repo
60
    :find-hg-bookmarks))
61
 
62
 (defpackage :vc/util
63
   (:use :cl :std :cli :vc/proto :vc/git :vc/hg :config)
64
   (:import-from :uri :uri :uri-to-string)
65
   (:export :make-repo :with-current-vc-root :with-repo
66
    :directory-repos :bundle-repo
67
    :bundle-repos :update-repo
68
    :update-repos))
69
    
70
 (defpackage :vc/cli
71
   (:use :cl :std :cli :clap :vc/proto :vc/git :vc/hg :vc/util)
72
   (:export :*vc-cli*))
73
 
74
 (pkg:defpkg :vc
75
   (:use :cl :std)
76
   (:use-reexport :vc/proto :vc/hg :vc/git #+cli :vc/cli :vc/util))