X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2FmatitaGuiTypes.mli;h=8e3932b04a1882dad615859a769bf52a4ce47f18;hb=f3d0ba1e75bc3383d766f3a33a19352db19854df;hp=d25735d4aebf1abd36271ede520e6f1964efdd9f;hpb=2c01ff6094173915e7023076ea48b5804dca7778;p=helm.git diff --git a/matita/matita/matitaGuiTypes.mli b/matita/matita/matitaGuiTypes.mli index d25735d4a..8e3932b04 100644 --- a/matita/matita/matitaGuiTypes.mli +++ b/matita/matita/matitaGuiTypes.mli @@ -49,10 +49,8 @@ object method fileSel : MatitaGeneratedGui.fileSelectionWin method main : MatitaGeneratedGui.mainWin method findRepl : MatitaGeneratedGui.findReplWin -(* method toolbar : MatitaGeneratedGui.toolBarWin *) method console: console - method sourceView: GSourceView2.source_view (** {2 Dialogs instantiation} * methods below create a new window on each invocation. You should @@ -63,22 +61,6 @@ object method newConfirmationDialog: unit -> MatitaGeneratedGui.confirmationDialog method newEmptyDialog: unit -> MatitaGeneratedGui.emptyDialog - (** {2 Selections / clipboards handling} *) - - method canCopy: bool - method canCut: bool - method canDelete: bool - method canPaste: bool - method canPastePattern: bool - - method markupSelected: bool - - method copy: unit -> unit - method cut: unit -> unit - method delete: unit -> unit - method paste: unit -> unit - method pastePattern: unit -> unit - (** {2 Utility methods} *) (** ask the used to choose a file with the file chooser @@ -90,67 +72,21 @@ object method askText: ?title:string -> ?msg:string -> unit -> string option method loadScript: string -> unit - method setStar: bool -> unit - - (** {3 Fonts} *) - method increaseFontSize: unit -> unit - method decreaseFontSize: unit -> unit - method resetFontSize: unit -> unit end type paste_kind = [ `Term | `Pattern ] - (** multi selection gtkMathView which handle mactions and hyperlinks. Mactions - * are handled internally. Hyperlinks are handled by calling an user provided - * callback *) -class type clickableMathView = -object - inherit GMathViewAux.multi_selection_math_view - - (** set hyperlink callback. None disable hyperlink handling *) - method set_href_callback: (string -> unit) option -> unit - - method has_selection: bool - - (** @raise Failure "no selection" *) - method strings_of_selection: (paste_kind * string) list - - method update_font_size: unit -end - -class type cicMathView = -object - inherit clickableMathView - - (** load a sequent and render it into parent widget *) - method load_sequent: Cic.metasenv -> int -> unit - method nload_sequent: - #NCicCoercion.status -> NCic.metasenv -> NCic.substitution -> int -> unit - - method load_object: Cic.obj -> unit - method load_nobject: #NCicCoercion.status -> NCic.obj -> unit -end - class type sequentsViewer = object method reset: unit method load_logo: unit method load_logo_with_qed: unit - method load_sequents: - #NCicCoercion.status -> GrafiteTypes.incomplete_proof -> unit - method nload_sequents: #NTacStatus.tac_status -> unit + method nload_sequents: #GrafiteTypes.status -> unit method goto_sequent: - #NCicCoercion.status -> int -> unit (* to be called _after_ load_sequents *) - - method cicMathView: cicMathView + #ApplyTransformation.status -> int -> unit (* to be called _after_ load_sequents *) end class type cicBrowser = object method load: MatitaTypes.mathViewer_entry -> unit - (* method loadList: string list -> MatitaTypes.mathViewer_entry -> unit *) - method loadInput: string -> unit - method mathView: clickableMathView - method win: browserWin end -