.ma inclusions corrected/minimized

[helm.git] / helm / matita / matitacLib.mli

diff --git a/helm/matita/matitacLib.mli b/helm/matita/matitacLib.mli
index a053a3f1a1318dd0ab667877cbaf8df50b9a0e14..7c07402d875f144ef99c9adfd182c2015f336353 100644 (file)
--- a/helm/matita/matitacLib.mli
+++ b/helm/matita/matitacLib.mli
@@ -28,9 +28,16 @@ val interactive_loop : unit -> unit
 (** go initializes the status and calls interactive_loop *)
 val go : unit -> unit
 val main : mode:[ `COMPILER | `TOPLEVEL ] -> unit
-val dump_moo_to_file: string -> string list -> unit
+
+(** fname is the .ma *)
+val dump_moo_to_file:
+  string ->
+  (CicNotationPt.term, GrafiteAst.obj) GrafiteAst.command 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