X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2FmatitaMisc.mli;h=b91275618aad386e35e3665524bc3075f2f4bd36;hb=a7658504ad03494fbc78b3112e3355bfcb760f3f;hp=170a87c9b1c03ae54fb6e8e7942ef82811025c10;hpb=7f2444c2670cadafddd8785b687ef312158376b0;p=helm.git diff --git a/matita/matitaMisc.mli b/matita/matitaMisc.mli index 170a87c9b..b91275618 100644 --- a/matita/matitaMisc.mli +++ b/matita/matitaMisc.mli @@ -73,3 +73,6 @@ val singleton: (unit -> 'a) -> (unit -> 'a) (** given the base name of an image, returns its full path *) val image_path: string -> string + + (** 2>/dev/null, HLog = (fun _ -> ()) *) +val shutup: unit -> unit