This commit was manufactured by cvs2svn to create tag

[helm.git] / helm / ocaml / mathql / mQueryUtil.mli

diff --git a/helm/ocaml/mathql/mQueryUtil.mli b/helm/ocaml/mathql/mQueryUtil.mli
index 139cb018143133ce2e782dc2dfe6c1016956a8a6..53d612e822ae60fd0fb5ba7aa6983dcd9657ee6d 100644 (file)
--- a/helm/ocaml/mathql/mQueryUtil.mli
+++ b/helm/ocaml/mathql/mQueryUtil.mli
@@ -33,12 +33,22 @@
 (*                                                                            *)
 (******************************************************************************)
 
-val str_uref   : MathQL.mquref -> string        (* string linearization of a UriManager reference *)
 
-val str_tref   : MathQL.mqtref -> string        (* string linearization of a tokenized reference *)
+val text_of_query  : (string -> unit) -> MathQL.query -> string -> unit
 
-val out_query  : MathQL.mquery -> string        (* HTML representation of a query *)
+val text_of_result : (string -> unit) -> MathQL.result -> string -> unit
 
-val tref_uref  : MathQL.mquref -> MathQL.mqtref (* "tref of uref" conversion *)
+val query_of_text  : Lexing.lexbuf -> MathQL.query
 
-val parse_text : in_channel -> MathQL.mquery    (* textual parsing of a query *) 
+val result_of_text : Lexing.lexbuf -> MathQL.result
+
+type time
+
+val start_time : unit -> time
+
+val stop_time  : time -> string
+
+
+type uriref = UriManager.uri * (int list)
+
+val string_of_uriref : uriref -> string