blob: 9e61411d6cddac9941ecf653e44aacc9b537494d (
plain) (
blame)
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
44
45
46
47
48
49
|
module Make (S : Abstract.Storage.STORAGE) : sig
type t
val encode : t -> Concepts.Blob.t
val decode : Concepts.Blob.t -> (t, Concepts.Condition.condition) result
val empty :
S.transaction ->
heading:Concepts.Hash.hash ->
?predicate:Concepts.Hash.hash ->
?local_constraints:Concepts.Hash.hash ->
?indexes:Concepts.Hash.hash ->
unit ->
(t, Concepts.Condition.condition) result
val store : S.transaction -> t -> (Concepts.Hash.hash, Concepts.Condition.condition) result
val make :
S.connection ->
heading:Concepts.Hash.hash ->
?predicate:Concepts.Hash.hash ->
?local_constraints:Concepts.Hash.hash ->
?indexes:Concepts.Hash.hash ->
unit ->
(Protocols.Handle.t, Concepts.Condition.condition) result
val load_value : S.transaction -> Concepts.Hash.hash -> (t, Concepts.Condition.condition) result
val wrap : S.connection -> t -> (Protocols.Handle.t, Concepts.Condition.condition) result
val load :
S.transaction ->
S.connection ->
Concepts.Hash.hash ->
(Protocols.Handle.t, Concepts.Condition.condition) result
val heading : t -> Concepts.Hash.hash
val predicate : t -> Concepts.Hash.hash option
val local_constraints : t -> Concepts.Hash.hash option
val tuples : t -> Concepts.Hash.hash
val indexes : t -> Concepts.Hash.hash option
val hash : t -> Concepts.Hash.hash
val assert_tuple :
S.transaction -> t -> Concepts.Blob.t -> (t, Concepts.Condition.condition) result
val contains_tuple :
S.transaction -> t -> Concepts.Blob.t -> (bool, Concepts.Condition.condition) result
end
|
