(******************************************************************************)
-val text_of_query : MathQL.query -> string
+val text_of_query : (string -> unit) -> MathQL.query -> string -> unit
-val text_of_result : MathQL.result -> string -> string
+val text_of_result : (string -> unit) -> MathQL.result -> string -> unit
val query_of_text : Lexing.lexbuf -> MathQL.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
-