no longer use Dbi module but directly use Mysql module since it's 13

[helm.git] / helm / ocaml / metadata / metadataConstraints.mli

diff --git a/helm/ocaml/metadata/metadataConstraints.mli b/helm/ocaml/metadata/metadataConstraints.mli
index ecdb3e6b2d370ac93f59cb61218afbf99f0e9477..3de99469c51cef9e31f6866ad305406dcf1ecf41 100644 (file)
--- a/helm/ocaml/metadata/metadataConstraints.mli
+++ b/helm/ocaml/metadata/metadataConstraints.mli
@@ -35,17 +35,17 @@ type term_signature = (string * string list) option * StringSet.t
 
   (** @return sorted list of theorem URIs, first URIs in the least have higher
   * relevance *)
-val cmatch: dbh:Dbi.connection -> Cic.term -> string list
+val cmatch: dbd:Mysql.dbd -> Cic.term -> string list
 
   (** as cmatch, but returned list is not sorted but rather tagged with
   * relevance information: higher the tag, higher the relevance *)
-val cmatch': dbh:Dbi.connection -> Cic.term -> (int * string) list
+val cmatch': dbd:Mysql.dbd -> Cic.term -> (int * string) list
 
 type where = [ `Conclusion | `Statement ] (** signature matching extent *)
 
   (** @param where defaults to `Conclusion *)
 val sigmatch:
-  dbh:Dbi.connection ->
+  dbd:Mysql.dbd ->
   ?where:where -> term_signature ->
     (int * string) list
 
@@ -60,7 +60,7 @@ type cardinality_condition =
   * @param full_card cardinality condition on the whole statement
   * @return list of URI satisfying given constraints *)
 val at_least:
-  dbh:Dbi.connection ->
+  dbd:Mysql.dbd ->
   ?concl_card:cardinality_condition ->
   ?full_card:cardinality_condition ->
   MetadataTypes.constr list ->
@@ -68,7 +68,7 @@ val at_least:
 
   (** @param where defaults to `Conclusion *)
 val at_most:
-  dbh:Dbi.connection ->
+  dbd:Mysql.dbd ->
   ?where:where -> StringSet.t ->
     (string -> bool)