class type script =
object
+ method locked_mark : Gtk.text_mark
+ method locked_tag : GText.tag
+
(** @return current status *)
method status: MatitaTypes.status
method retract : unit -> unit
method goto: [`Top | `Bottom | `Cursor] -> unit -> unit
method reset: unit -> unit
+ method template: unit -> unit
(** {2 Load/save} *)
- method loadFrom : string -> unit
- method saveTo : string -> unit
+ method assignFileName : string -> unit (* to the current active file *)
+ method loadFromFile : string -> unit
+ method saveToFile : unit -> unit
(** {2 Current proof} (if any) *)
method proofStatus: ProofEngineTypes.status (** @raise Statement_error *)
method proofMetasenv: Cic.metasenv (** @raise Statement_error *)
method proofContext: Cic.context (** @raise Statement_error *)
+ method proofConclusion: Cic.term (** @raise Statement_error *)
method setGoal: int -> unit
+ (** end of script, true if the whole script has been executed *)
+ method eos: bool
+
+ (** misc *)
+ method clean_dirty_lock: unit
+
(* debug *)
method dump : unit -> unit
end
+ (** @param set_star callback used to set the modified symbol (usually a star
+ * "*") on the side of a script name *)
val script:
- buffer:GText.buffer ->
+ source_view:GSourceView.source_view ->
init:MatitaTypes.status ->
mathviewer: MatitaTypes.mathViewer->
+ urichooser: (UriManager.uri list -> UriManager.uri list) ->
+ develcreator: (containing:string option -> unit) ->
+ ask_confirmation:
+ (title:string -> message:string -> [`YES | `NO | `CANCEL]) ->
+ set_star: (string -> bool -> unit) ->
unit ->
script