* http://helm.cs.unibo.it/
*)
-class type console =
-object
- method message: string -> unit
- method error: string -> unit
- method warning: string -> unit
- method debug: string -> unit
- method clear: unit -> unit
-
- method log_callback: HLog.log_callback
-end
-
-class type browserWin =
-object
- inherit MatitaGeneratedGui.browserWin
- method browserUri: GEdit.entry
-end
-
class type gui =
object
- method setQuitCallback : (unit -> unit) -> unit
-
(** {2 Access to singleton instances of lower-level GTK widgets} *)
-
- 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
- * remember to destroy windows after use *)
-
- method newBrowserWin: unit -> browserWin
- method newUriDialog: unit -> MatitaGeneratedGui.uriChoiceDialog
- 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
+ method main: MatitaGeneratedGui.mainWin
(** {2 Utility methods} *)
-
- (** ask the used to choose a file with the file chooser
- * @param ok_not_exists if set to true returns also non existent files
- * (useful for save). Defaults to false *)
- method chooseFile: ?ok_not_exists:bool -> unit -> string option
-
- (** prompt the user for a (multiline) text entry *)
- 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 GSourceView2.source_view
-
- method load_root : root:string -> unit
- method remove_selections: unit
- method set_selection: unit option -> unit
- method get_selections: unit list
- method set_font_size: int -> unit
-
-
- (** 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 nload_sequent:
- #LexiconTypes.status -> NCic.metasenv -> NCic.substitution -> int -> unit
-
- method load_nobject: #LexiconTypes.status -> NCic.obj -> unit
-end
-
class type sequentsViewer =
object
method reset: unit
method load_logo: unit
method load_logo_with_qed: unit
- method nload_sequents: #NTacStatus.tac_status -> unit
+ method nload_sequents: #GrafiteTypes.status -> unit
method goto_sequent:
- #LexiconTypes.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
-