]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matitaMisc.mli
more work for the release
[helm.git] / matita / matitaMisc.mli
index 170a87c9b1c03ae54fb6e8e7942ef82811025c10..b91275618aad386e35e3665524bc3075f2f4bd36 100644 (file)
@@ -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