X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=src%2Flogger.mli;h=15b28e9f64a753ab35d6c1e21774bd6727b16d9b;hb=4516c5fe48693d769b62b987fe561d9aa8951695;hp=1ee96d502178db3cd873946446ab6ae1029f7f27;hpb=e55eb5e1ceafa840dc1d137d7fae5fb06eac3875;p=SXSI%2Fxpathcomp.git diff --git a/src/logger.mli b/src/logger.mli index 1ee96d5..15b28e9 100644 --- a/src/logger.mli +++ b/src/logger.mli @@ -13,3 +13,7 @@ val available : unit -> string list val set_verbose : bool -> unit val verbose : Format.formatter -> ('a, Format.formatter, unit) format -> 'a + +val start_msg : Format.formatter -> string -> unit +val end_msg : Format.formatter -> string -> unit +val msg : Format.formatter -> ('a, Format.formatter, unit) format -> 'a