Coverage report: /development/source/library/com/dydra/gitlab/dydra-cgi/ffi/lisp/rdfcache/package.lisp

KindCoveredAll%
expression1318 72.2
branch00nil
Key
Not instrumented
Conditionalized out
Executed
Not executed
 
Both branches taken
One branch taken
Neither branch taken
1
 ;;; -*- Mode: lisp; Syntax: ansi-common-lisp; Base: 10; Package: common-lisp-user; -*-
2
 
3
 (in-package :common-lisp-user)
4
 
5
 (defpackage :rdfcache
6
   (:use :cl :cffi :cffi-sys
7
         #+sbcl :sb-cltl2)
8
   (:shadowing-import-from :dydra-ndk :defcfun :defcfunwi)
9
   (:export
10
     :*all-context-number*
11
     :*default-context-pointer*
12
     :*default-context-number*
13
     :*named-context-number*
14
     :*wildcard-term-pointer*
15
     :*wildcard-term-number*
16
     :load-library
17
     :unload-library
18
     :features
19
     :modules
20
     ;; Conditions
21
     :error
22
     :initialization-error
23
     :mismatched-version
24
     :mismatched-version-expected
25
     :mismatched-version-actual
26
     :incompatible-version
27
     :incompatible-abi-version
28
     :incompatible-abi-structure
29
     :incompatible-abi-structure-type
30
     :missing-feature
31
     :missing-feature-name
32
     :foreign-function-error
33
     :foreign-function-error-function
34
     :foreign-function-error-code
35
     :foreign-function-error-message
36
     ;; Query API
37
     :count
38
     :match
39
     :match-with-filter
40
     ;; Cursor API
41
     :init-thread
42
     :exit-thread
43
     :with-cursor
44
     :declare-terms
45
     :rewind
46
     :skip
47
     :next
48
     :close
49
     :ephemeral-term-number-p
50
     :fetch-cursor-context
51
     :fetch-cursor-subject
52
     :fetch-cursor-predicate
53
     :fetch-cursor-object
54
     :cursor-count
55
     :cursor-quad-pointer
56
     :cursor-context
57
     :cursor-context-number
58
     :cursor-context-pointer
59
     :cursor-context-type
60
     :cursor-context-value
61
     :cursor-context-to-list
62
     :cursor-context-to-string
63
     :cursor-subject
64
     :cursor-subject-number
65
     :cursor-subject-pointer
66
     :cursor-subject-type
67
     :cursor-subject-value
68
     :cursor-subject-to-list
69
     :cursor-subject-to-string
70
     :cursor-predicate
71
     :cursor-predicate-number
72
     :cursor-predicate-pointer
73
     :cursor-predicate-type
74
     :cursor-predicate-value
75
     :cursor-predicate-to-list
76
     :cursor-predicate-to-string
77
     :cursor-object
78
     :cursor-object-number
79
     :cursor-object-pointer
80
     :cursor-object-type
81
     :cursor-object-value
82
     :cursor-object-to-list
83
     :cursor-object-to-string
84
     :persistent-term-number-p
85
     :with-cursor-term
86
     :print-cursor
87
     ;; Term Cursor API
88
     :map-context-numbers
89
     :map-object-numbers
90
     :map-predicate-numbers
91
     :map-subject-numbers
92
     ;; Miscellaneous
93
     ;:serialize-term
94
     ;:serialize-triple
95
     ;:serialize-quad
96
     :with-term
97
     :with-uri-term
98
     :with-node-term
99
     :with-literal-term
100
     :make-term
101
     :destroy-term
102
     :make-uri-term
103
     :make-node-term
104
     :make-literal-term
105
     :initialize-term ;; deprecated
106
     :init-term
107
     :init-uri-term
108
     :init-node-term
109
     :init-literal-term
110
     :term-type
111
     :term-value
112
     :term-to-list
113
     :term-to-string
114
     :with-term-string
115
     :with-term-attributes
116
     :make-triple
117
     :make-quad
118
     :quad-term-type
119
     :quad-term-value
120
     ;; Repository API
121
     :resolve-repository
122
     ;; Shard API
123
     :attach
124
     :detach
125
     :fetch-term
126
     :fetch-term-type
127
     :lookup-term-number
128
     ;; SPARQL Query API
129
     :equal-term
130
     :same-term
131
     :is-uri
132
     :is-blank
133
     :is-literal
134
     :is-numeric
135
     :strlen
136
     ;; SPARQL Update API
137
     :sparql-create
138
     :sparql-clear
139
     :sparql-load
140
     :sparql-drop
141
     :sparql-copy
142
     :sparql-move
143
     :sparql-add
144
     ;; Transaction API
145
     :*current-transaction*
146
     :clone-transaction
147
     :%make-transaction
148
     :%destroy-transaction
149
     :transaction-slot-pointer
150
     :transaction-slot-value
151
     :transaction-status
152
     :transaction-uuid-pointer
153
     :transaction-uuid-string
154
     :transaction-repository-name
155
     :transaction-parent-revision-p
156
     :transaction-parent-revision-uuid-pointer
157
     :transaction-parent-revision-uuid-string
158
     :transaction-insert-count
159
     :transaction-delete-count
160
     :initialize-transaction
161
     :reset-transaction
162
     :begin-transaction
163
     :abort-transaction
164
     :commit-transaction
165
     :insert-statement
166
     :delete-statement
167
     :fetch-term*
168
     :lookup-term
169
     :intern-term
170
     :with-transaction
171
     :print-transaction
172
     ;; UUID API
173
     ;:uuid-to-string
174
     ;:with-uuid
175
     ;:print-uuid
176
     ;; Matrix API
177
     :matrix
178
     :cursor-to-matrix
179
     :cursor-append-matrix
180
     ;:list-to-matrix
181
     :make-matrix
182
     :matrix-free
183
     :matrix-release
184
     ;:matrix-clone
185
     :matrix-concatenate
186
     :matrix-size
187
     :matrix-data-pointer
188
     :matrix-to-list
189
     :matrix-row-count
190
     ;:matrix-row-to-list
191
     :matrix-column-count
192
     ;:matrix-column-to-list
193
     :matrix-element-count
194
     :matrix-row-size
195
     :matrix-get
196
     :matrix-set
197
     ;:matrix-clear
198
     ;:matrix-clear-row
199
     ;:matrix-clear-column
200
     :matrix-fill
201
     ;:matrix-fill-row
202
     ;:matrix-fill-column
203
     ;:matrix-drop-column
204
     ;:matrix-drop-columns
205
     ;:matrix-append-row
206
     :matrix-append-rows
207
     ;:matrix-append-column
208
     ;:matrix-append-columns
209
     :matrix-resize
210
     ;:matrix-sort
211
     :matrix-sort-by
212
     :print-matrix
213
     ;; Utility API
214
     :generate-node
215
     :time-in-thread
216
     :boost
217
     :yield)
218
   (:shadow :error :count :close))
219
 
220
 (in-package :rdfcache)
221
 
222
 (define-condition simple-style-warning (style-warning simple-warning) ())
223
 
224
 (defun simple-style-warning (message &rest args)
225
   (warn 'simple-style-warning :format-control message :format-arguments args))
226
 
227
 (defun deprecation-warning (old-name &optional new-name)
228
   (if new-name
229
       (simple-style-warning "~S is deprecated. Please use ~S instead." old-name new-name)
230
       (simple-style-warning "~S is deprecated. Please discontinue use." old-name)))
231
 
232
 (defmacro defun/deprecated (defun-name defun-args &rest defun-body)
233
   `(progn
234
      ;(declaim (inline ,defun-name))
235
      (defun ,defun-name ,defun-args ,@defun-body)
236
      (define-compiler-macro ,defun-name (&rest macro-args)
237
        (deprecation-warning ',defun-name ',(caar defun-body))
238
        `(apply (function ,',defun-name) ,@macro-args '()))))