X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fsoftware%2Fmatita%2FmatitacLib.mli;h=034aaedafa2593200431241784b8ad28b52ba88a;hb=54551ce5acf37f04972291e774d14371a671a8c7;hp=636c51d5754beddf21bf73ec9d7e298254cc2993;hpb=55b82bd235d82ff7f0a40d980effe1efde1f5073;p=helm.git

diff --git a/helm/software/matita/matitacLib.mli b/helm/software/matita/matitacLib.mli
index 636c51d57..034aaedaf 100644
--- a/helm/software/matita/matitacLib.mli
+++ b/helm/software/matita/matitacLib.mli
@@ -23,15 +23,10 @@
  * http://helm.cs.unibo.it/
  *)
 
-val interactive_loop : unit -> unit
+(* ma from mma generation: ma file -> atexit function *)
+val dump: string -> 'a -> 'a
 
-(** go initializes the status and calls interactive_loop *)
-val go : unit -> unit
-val main : mode:[ `COMPILER | `TOPLEVEL ] -> unit
+module Make : sig
+        val make: string -> string list -> bool
+end
 
-(** clean_exit n
-  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 option -> unit