X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fmatita%2FmatitaMathView.mli;h=0a1e425e3da9f9ba4efb6fcbd7fc47d634cccbd6;hb=7e9904185ceff75884783dbf0bad506b8521b857;hp=b7a18e920ed0b0cef08800c091979e6ad57eea8b;hpb=ac813b7e251e4bac1a8a16befa628203775771ca;p=helm.git diff --git a/helm/matita/matitaMathView.mli b/helm/matita/matitaMathView.mli index b7a18e920..0a1e425e3 100644 --- a/helm/matita/matitaMathView.mli +++ b/helm/matita/matitaMathView.mli @@ -23,16 +23,20 @@ * http://helm.cs.unibo.it/ *) -class type proof_viewer = + (** multi selection gtkMathView which handle mactions and hyperlinks. Mactions + * are handled internally. Hyperlinks are handled by calling an user provided + * callback *) +class type clickable_math_view = object - inherit GMathViewAux.single_selection_math_view + inherit GMathViewAux.multi_selection_math_view - method load_proof: StatefulProofEngine.proof_status -> unit + (** set hyperlink callback. None disable hyperlink handling *) + method set_href_callback: (string -> unit) option -> unit end class type sequent_viewer = object - inherit GMathViewAux.multi_selection_math_view + inherit clickable_math_view (** @return the list of selected terms. Selections which are not terms are * ignored *) @@ -53,7 +57,10 @@ class type sequents_viewer = method goto_sequent: int -> unit (* to be called _after_ load_sequents *) end -val proof_viewer: +(** {2 Constructors} *) + + (** meta constructor *) +type 'widget constructor = ?hadjustment:GData.adjustment -> ?vadjustment:GData.adjustment -> ?font_size:int -> @@ -63,30 +70,26 @@ val proof_viewer: ?packing:(GObj.widget -> unit) -> ?show:bool -> unit -> - proof_viewer + 'widget - (** singleton proof_viewer instance. - * Uses singleton GUI instance *) -val proof_viewer_instance: unit -> proof_viewer +val clickable_math_view: clickable_math_view constructor -val sequent_viewer: - ?hadjustment:GData.adjustment -> - ?vadjustment:GData.adjustment -> - ?font_size:int -> - ?log_verbosity:int -> - ?width:int -> - ?height:int -> - ?packing:(GObj.widget -> unit) -> - ?show:bool -> - unit -> - sequent_viewer +val sequent_viewer: sequent_viewer constructor val sequents_viewer: notebook:GPack.notebook -> sequent_viewer:sequent_viewer -> - set_goal:(int -> unit) -> unit -> sequents_viewer +val cicBrowser: unit -> MatitaTypes.cicBrowser + +val refresh_all_browsers: unit -> unit + val mathViewer: unit -> MatitaTypes.mathViewer +(** {2 singleton instances} *) + +val sequent_viewer_instance: unit -> sequent_viewer +val sequents_viewer_instance: unit -> sequents_viewer +