X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2FmatitacLib.mli;h=b19ff5b90c4ef0ef72ef09bc3d494452565960d3;hb=b9af9f1c0de6a1735b492f5c793a87a8fce218cc;hp=a053a3f1a1318dd0ab667877cbaf8df50b9a0e14;hpb=5965234ea82419215b121405fc6dfc53abe4b491;p=helm.git

diff --git a/helm/matita/matitacLib.mli b/helm/matita/matitacLib.mli
index a053a3f1a..b19ff5b90 100644
--- a/helm/matita/matitacLib.mli
+++ b/helm/matita/matitacLib.mli
@@ -28,9 +28,13 @@ val interactive_loop : unit -> unit
 (** go initializes the status and calls interactive_loop *)
 val go : unit -> unit
 val main : mode:[ `COMPILER | `TOPLEVEL ] -> unit
+
+(** fname is the .ma *)
 val dump_moo_to_file: string -> string list -> unit
 
 (** clean_exit n
-  performs an exit [n] after a complete clean-up of what was partially compiled
+  if n = Some n it performs an exit [n] after a complete clean-up of what was
+   partially compiled
+  otherwise it performs the clean-up without exiting
 *)
-val clean_exit : int -> unit
+val clean_exit : int option -> unit