Coverage report: /home/ellis/comp/core/app/skel/core/pkg.lisp

KindCoveredAll%
expression011 0.0
branch00nil
Key
Not instrumented
Conditionalized out
Executed
Not executed
 
Both branches taken
One branch taken
Neither branch taken
1
 (defpackage :skel/core/proto
2
   (:use :cl :std)
3
   (:export
4
    ;; types
5
    :license-designator :script-designator :contact-designator
6
    ;; generics
7
    :sk-run :sk-new 
8
    :sk-tangle :sk-weave
9
    :sk-call :sk-call*
10
    :sk-load :sk-save
11
    :sk-print :sk-read
12
    :sk-build
13
    :sk-compile :sk-transform
14
    :sk-write :sk-writeln
15
    :sk-write-string :sk-write-file
16
    :sk-read-file :sk-install-user-config
17
    :sk-find :sk-find*
18
    :sk-convert :sk-load-component
19
    :sk-install
20
    :sk-test
21
    :sk-deploy
22
    :sk-fetch
23
    :sk-pack
24
    :sk-unpack
25
    :sk-bundle
26
    :sk-unbundle
27
    :sk-register))
28
 
29
 (defpackage :skel/core/int
30
   (:use :cl :std/condition :dat/sxp :obj/ast :skel/core/proto)
31
   (:import-from :std/macs :eval-always)
32
   (:import-from :sb-unix :uid-username :unix-getuid)
33
   (:import-from :ast :*keep-ast*)
34
   (:import-from :std/path :merge-homedir-pathnames)
35
   (:import-from :vc :vc-designator)
36
   ;; conditions
37
   (:export
38
    :skel-condition
39
    :skel-error
40
    :skel-simple-error
41
    :skel-syntax-error
42
    :invalid-skel-ast
43
    :skel-io-error
44
    :skel-compile-error)
45
   ;; vars
46
   (:export
47
    :*skel-project* :*default-skelrc*
48
    :*skel-env* :*skel-project*
49
    :*default-skelfile* :*default-skel-user* 
50
    :*default-skel-vc-kind*
51
    :*default-skel-cache* :*skelfile-extension* :*skelfile-boundary*
52
    :*skel-init-hook*)
53
   (:export
54
    #:skel-stash
55
    #:skel-store
56
    #:skel-cache
57
    #:skel-path
58
    #:user-skelrc
59
    #:system-skelrc
60
    #:skel-data
61
    #:*default-skel-bindings*
62
    #:*skel-project-functions*
63
    #:*skel-project-symbol-macros*
64
    #:*skel-project-macros*))
65
 
66
 (defpackage :skel/core/header
67
   (:use :cl :std :skel/core/int :doc)
68
   (:export
69
    :make-file-header 
70
    :make-shebang-file-header 
71
    :make-source-file-header 
72
    :file-header-kind
73
    :file-header
74
    :make-source-header-comment 
75
    :make-shebang-comment))
76
 
77
 (defpackage :skel/core/obj
78
   (:use :cl :std :obj
79
    :skel/core/proto :skel/core/int
80
    :dat/sxp :skel/core/header :vc :log
81
    :config :id :ast)
82
   (:import-from :uiop :ensure-absolute-pathname :read-file-forms)
83
   (:export :sk-license :sk-author :sk-stash :sk-cache :sk-data :sk-user
84
    :sk-store :sk-push :sk-pull :sk-include
85
    :sk-tags :edit-skelrc :sk-target :skel
86
    :sk-meta :def-sk-class :sk-project :sk-source
87
    :sk-vc :sk-bind :sk-env :make-sk-rule
88
    :sk-rule :sk-rule-target :sk-rule-source :sk-rule-recipe
89
    :sk-make :sk-description :sk-kind :sk-rules
90
    :sk-version
91
    :sk-command :sk-scripts :sk-script :sk-config
92
    :sk-snippets :sk-snippet :sk-abbrevs :sk-abbrev
93
    :sk-user-config :sk-system-config
94
    :*skel-user-config* :*skel-system-config*
95
    :sk-src :sk-component :sk-components :sk-mod
96
    :sk-parent
97
    :sk-phases))
98
 
99
 (defpackage :skel/core/schema
100
   (:use :cl :std :skel/core/obj :skel/core/proto :skel/core/int :schema :rdb)
101
   (:export :sk-object-schema :sk-schema :*skel-registry-schema* :*skel-cache-schema*))
102
 
103
 (defpackage :skel/core/db
104
   (:use :cl :std :skel/core/int :skel/core/schema
105
    :skel/core/obj :skel/core/proto :db
106
    :store :schema :rdb
107
    :id :stored :log :config :build)
108
   (:export :skel-db 
109
    :skel-db-path))
110
 
111
 (defpackage :skel/core/log
112
   (:use :cl :std :log :skel/core/db :skel/core/int 
113
    :skel/core/obj :skel/core/proto :db
114
    :store :schema :rdb :id :stored :log :config :build :skel/core/schema)
115
   (:export
116
    :sk-log-schema
117
    :*skel-log-schema*
118
    :skel-db-logger
119
    :*skel-logger-config*
120
    :*skel-logger*
121
    :init-skel-logger
122
    :sk-log-shutdown
123
    :sk-log-repair
124
    :sk-log-close
125
    :sk-log-list
126
    :skel-db-sink))
127
 
128
 (defpackage :skel/core/util
129
   (:use :cl :std :skel/core/obj :skel/core/proto :dat/sxp :skel/core/int :obj/ast)
130
   (:import-from :uiop/pathname :pathname-parent-directory-pathname)
131
   (:import-from :cli :find-exe)
132
   (:export
133
    :init-skelrc :load-skelrc
134
    :init-skel
135
    :init-user-skelrc :load-user-skelrc
136
    :init-system-skelrc :load-system-skelrc
137
    :init-skelfile
138
    :load-skelfile
139
    :find-skelfile
140
    :find-sk-file
141
    :sk-config-slot
142
    :sk-project-slot
143
    :find-project-root
144
    :setf-skel-vars
145
    :list-all-projects
146
    :sk-search-project
147
    :project-root))
148
 
149
 (defpackage :skel/core/vm
150
   (:use :cl :std :skel/core/int :sb-vm)
151
   (:export :make-stack-slot :make-sk-vm :sks-ref :sks-pop :sks-push
152
            :skel-vm
153
            :make-skel-vm
154
            :skel-vm-p
155
            :copy-skel-vm
156
            :skel-vm-ip
157
            :skel-vm-stack
158
            :*stack-slot-types*
159
            :stack-slot-type
160
            :stack-slot
161
            :*stack-op-types*
162
            :stack-op-type
163
            :*skel-op-types*
164
            :skel-op-type
165
            :new-skel-arena
166
            :with-skel-vm
167
            :skel-op
168
            :make-skel-op
169
            :skel-op-p
170
            :copy-skel-op
171
            :skel-op-scope
172
            :skel-op-body
173
            :*skel-stack-size*
174
            :*skel-arena*
175
            :*skel-scope*
176
            :init-skel-op-scope
177
            :*skel-arena-size*
178
            :init-skel-scope
179
            :init-skel-value-scope
180
            :init-skel-function-scope))
181
 
182
 (defpackage :skel/core/print
183
   (:use :cl :std :skel/core/int :skel/core/obj :skel/core/proto)
184
   (:export))
185
 
186
 (defpackage :skel/core/plan
187
   (:use :cl :std :skel/core/int :skel/core/obj :skel/core/proto :plan))