aboutsummaryrefslogtreecommitdiffhomepage
path: root/stm/vcs.mli
diff options
context:
space:
mode:
Diffstat (limited to 'stm/vcs.mli')
-rw-r--r--stm/vcs.mli8
1 files changed, 4 insertions, 4 deletions
diff --git a/stm/vcs.mli b/stm/vcs.mli
index 6c3571a08..7241ae461 100644
--- a/stm/vcs.mli
+++ b/stm/vcs.mli
@@ -79,11 +79,11 @@ module type S = sig
(* read only dag *)
module Dag : Dag.S with type node = id
- val dag : ('kind,'diff,'info) t -> ('diff,'info,id) Dag.t
+ val dag : ('kind,'diff,'info) t -> ('diff,'info,id * id) Dag.t
- val create_cluster : ('k,'e,'i) t -> id list -> id -> ('k,'e,'i) t
- val cluster_of : ('k,'e,'i) t -> id -> id Dag.Cluster.t option
- val delete_cluster : ('k,'e,'i) t -> id Dag.Cluster.t -> ('k,'e,'i) t
+ val create_cluster : ('k,'e,'i) t -> id list -> (id * id) -> ('k,'e,'i) t
+ val cluster_of : ('k,'e,'i) t -> id -> (id * id) Dag.Cluster.t option
+ val delete_cluster : ('k,'e,'i) t -> (id * id) Dag.Cluster.t -> ('k,'e,'i) t
end