X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2FmatitaGuiTypes.mli;h=d25735d4aebf1abd36271ede520e6f1964efdd9f;hb=6b229b2d85552d78fcbce805248f87559f7f6df8;hp=6457dc0c8d5701cac8d06a58582fe96653f85814;hpb=48b1c073868dcddf01140775cb0e5ac524fdbf14;p=helm.git diff --git a/helm/software/matita/matitaGuiTypes.mli b/helm/software/matita/matitaGuiTypes.mli index 6457dc0c8..d25735d4a 100644 --- a/helm/software/matita/matitaGuiTypes.mli +++ b/helm/software/matita/matitaGuiTypes.mli @@ -37,7 +37,7 @@ end class type browserWin = object inherit MatitaGeneratedGui.browserWin - method browserUri: GEdit.combo_box_entry + method browserUri: GEdit.entry end class type gui = @@ -49,12 +49,10 @@ object method fileSel : MatitaGeneratedGui.fileSelectionWin method main : MatitaGeneratedGui.mainWin method findRepl : MatitaGeneratedGui.findReplWin - method develList: MatitaGeneratedGui.develListWin - method newDevel: MatitaGeneratedGui.newDevelWin (* method toolbar : MatitaGeneratedGui.toolBarWin *) method console: console - method sourceView: GSourceView.source_view + method sourceView: GSourceView2.source_view (** {2 Dialogs instantiation} * methods below create a new window on each invocation. You should @@ -62,7 +60,6 @@ object method newBrowserWin: unit -> browserWin method newUriDialog: unit -> MatitaGeneratedGui.uriChoiceDialog - method newRecordDialog: unit -> MatitaGeneratedGui.recordChoiceDialog method newConfirmationDialog: unit -> MatitaGeneratedGui.confirmationDialog method newEmptyDialog: unit -> MatitaGeneratedGui.emptyDialog @@ -88,13 +85,12 @@ object * @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 - method createDevelopment: containing:string option -> unit (** prompt the user for a (multiline) text entry *) method askText: ?title:string -> ?msg:string -> unit -> string option method loadScript: string -> unit - method setStar: string -> bool -> unit + method setStar: bool -> unit (** {3 Fonts} *) method increaseFontSize: unit -> unit @@ -128,8 +124,11 @@ object (** 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 = @@ -137,8 +136,11 @@ object method reset: unit method load_logo: unit method load_logo_with_qed: unit - method load_sequents: GrafiteTypes.incomplete_proof -> unit - method goto_sequent: int -> unit (* to be called _after_ load_sequents *) + method load_sequents: + #NCicCoercion.status -> GrafiteTypes.incomplete_proof -> unit + method nload_sequents: #NTacStatus.tac_status -> unit + method goto_sequent: + #NCicCoercion.status -> int -> unit (* to be called _after_ load_sequents *) method cicMathView: cicMathView end @@ -149,5 +151,6 @@ object (* method loadList: string list -> MatitaTypes.mathViewer_entry -> unit *) method loadInput: string -> unit method mathView: clickableMathView + method win: browserWin end