]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/matitaTypes.ml
Most warnings turned into errors and avoided
[helm.git] / matita / matita / matitaTypes.ml
index e5b80d0e883c483e3c6b41e3028205985462e475..092c79c986e103e7c4b92fcb7bdc159e471a7b95 100644 (file)
@@ -25,9 +25,6 @@
 
 (* $Id$ *)
 
-open Printf
-open GrafiteTypes
-
   (** user hit the cancel button *)
 exception Cancel
 
@@ -75,14 +72,3 @@ let entry_of_string = function
   | "about:grammar"    -> `About `Grammar
   | _ ->  (* only about entries supported ATM *)
       raise (Invalid_argument "entry_of_string")
-
-class type mathViewer =
-  object
-    (** @param reuse if set reused last opened cic browser otherwise 
-     *  opens a new one. default is false
-     *)
-    method show_entry: ?reuse:bool -> mathViewer_entry -> unit
-    method screenshot: 
-      GrafiteTypes.status -> NCic.metasenv -> NCic.metasenv ->
-        NCic.substitution -> string -> unit
-  end