X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fmathql%2FmQueryUtil.mli;h=69aaebd774cce29633faafb4e52f966288d35569;hb=931f10c61b4e3914474955a94a05cf43b5fa2bc0;hp=0e62e4a1397bdba8a5b4717b534afbc62530e185;hpb=dec50888f98015c937283acc14e2ffceccc04a11;p=helm.git

diff --git a/helm/ocaml/mathql/mQueryUtil.mli b/helm/ocaml/mathql/mQueryUtil.mli
index 0e62e4a13..69aaebd77 100644
--- a/helm/ocaml/mathql/mQueryUtil.mli
+++ b/helm/ocaml/mathql/mQueryUtil.mli
@@ -23,28 +23,24 @@
  * http://cs.unibo.it/helm/.
  *)
 
-(******************************************************************************)
-(*                                                                            *)
-(*                               PROJECT HELM                                 *)
-(*                                                                            *)
-(*                     Ferruccio Guidi <fguidi@cs.unibo.it>                   *)
-(*                                 30/04/2002                                 *)
-(*                                                                            *)
-(*                                                                            *)
-(******************************************************************************)
+(*  AUTOR: Ferruccio Guidi <fguidi@cs.unibo.it>
+ *)
+
+val text_of_query  : (string -> unit) -> MathQL.query -> string -> unit
+
+val text_of_result : (string -> unit) -> MathQL.result -> string -> unit
 
-val str_uref    : MathQL.mquref -> string        (* string linearization of a UriMan. reference *)
+val query_of_text  : Lexing.lexbuf -> MathQL.query
 
-val str_tref    : MathQL.mqtref -> string        (* string linearization of a tokenized reference *)
+val result_of_text : Lexing.lexbuf -> MathQL.result
 
-val xp_str_uref : MathQL.mquref -> string        (* string linearization of a UriMan. reference *)
+type time
 
-val xp_str_tref : MathQL.mqtref -> string        (* string linearization of a tokenized reference *)
+val start_time : unit -> time
 
-val out_query   : MathQL.mquery -> string        (* HTML representation of a query *)
+val stop_time  : time -> string
 
-val out_result  : MathQL.mqresult -> string      (* HTML representation of a query result *)
 
-val tref_uref   : MathQL.mquref -> MathQL.mqtref (* "tref of uref" conversion *)
+type uriref = UriManager.uri * (int list)
 
-val parse_text  : in_channel -> MathQL.mquery    (* textual parsing of a query *) 
+val string_of_uriref : uriref -> string