X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2FcicMathView.mli;h=521115548438e2e874e67a7f83d059cef885be92;hb=90c02d72e5bb0ee0a9f98b12c540cca1b0c9c411;hp=260452bd5fed2d7a7f9d4215488c0faa86b569b5;hpb=d499140be1e8684d99ef51ffef0fb4098ed92369;p=helm.git diff --git a/matita/matita/cicMathView.mli b/matita/matita/cicMathView.mli index 260452bd5..521115548 100644 --- a/matita/matita/cicMathView.mli +++ b/matita/matita/cicMathView.mli @@ -29,9 +29,6 @@ class type cicMathView = object inherit GObj.widget - method set_font_size: int -> unit - method update_font_size: unit - method load_root : root:document_element -> unit method remove_selections: unit method set_selection: document_element option -> unit @@ -59,3 +56,12 @@ val cicMathView : val empty_mathml: document_element Lazy.t val closed_goal_mathml: document_element Lazy.t + +val screenshot: + GrafiteTypes.status -> NCic.metasenv -> NCic.metasenv -> + NCic.substitution -> string -> unit + +(* CSC: these functions should completely disappear; bad design; + the object type is MatitaScript.script *) +val register_matita_script_current: (unit -> < advance: ?statement:string -> unit -> unit; status: GrafiteTypes.status >) -> unit +val get_matita_script_current: unit -> < advance: ?statement:string -> unit -> unit; status: GrafiteTypes.status >