X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2FmatitaMisc.mli;h=b91275618aad386e35e3665524bc3075f2f4bd36;hb=8097af927e3e0f80c6dd2cb219b38f18e81df2a6;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