Module Stm
module AsyncOpts : sig ... endtype stm_doc_type=|VoDoc of string|VioDoc of string|Interactive of Coqargs.topThe STM document type
stm_doc_typedetermines some properties such as what uncompleted proofs are allowed and what gets recorded to aux files.
type stm_init_options={doc_type : stm_doc_type;The STM does set some internal flags differently depending on the specified
doc_type. This distinction should disappear at some some point.injections : Coqargs.injection_command list;Injects Require and Set/Unset commands before the initial state is ready
}STM initialization options:
val init_process : AsyncOpts.stm_opt -> unitinit_processperforms some low-level initialization, call early
val new_doc : stm_init_options -> doc * Stateid.tnew_doc optCreates a new document with optionsopt
val parse_sentence : doc:doc -> Stateid.t -> entry:(Pvernac.proof_mode option -> 'a Pcoq.Entry.t) -> Pcoq.Parsable.t -> 'aparse_sentence sid entry paReads a sentence frompawith parsing statesidand non terminalentry.entryreceives in input the current proof mode.sidshould be associated with a valid parsing state (which may not be the case if an error was raised at parsing time).
type add_focus=|NewAddTip|Unfocus of Stateid.t
val add : doc:doc -> ontop:Stateid.t -> ?newtip:Stateid.t -> bool -> Vernacexpr.vernac_control -> doc * Stateid.t * add_focusval get_prev_proof : doc:doc -> Stateid.t -> Proof.t optionval get_proof : doc:doc -> Stateid.t -> Proof.t optionval query : doc:doc -> at:Stateid.t -> route:Feedback.route_id -> Pcoq.Parsable.t -> unit
type focus={start : Stateid.t;stop : Stateid.t;tip : Stateid.t;}type edit_focus=|NewTip|Focus of focus
val edit_at : doc:doc -> Stateid.t -> doc * edit_focusval observe : doc:doc -> Stateid.t -> unitval finish : doc:doc -> Vernacstate.tval wait : doc:doc -> unitval stop_worker : string -> unitval join : doc:doc -> unitval snapshot_vio : create_vos:bool -> doc:doc -> output_native_objects:bool -> Names.DirPath.t -> string -> unitval reset_task_queue : unit -> unit
type documenttype tasks= (Opaqueproof.opaque_handle option, document) Library.tasks
val check_task : string -> tasks -> int -> boolval info_tasks : tasks -> (string * float * int) listval finish_tasks : string -> Library.seg_univ -> Library.seg_proofs -> tasks -> Library.seg_univ * Library.seg_proofsval get_current_state : doc:doc -> Stateid.tval get_ldir : doc:doc -> Names.DirPath.tval get_ast : doc:doc -> Stateid.t -> Vernacexpr.vernac_control optionval set_compilation_hints : string -> unitval set_perspective : doc:doc -> Stateid.t list -> unit
module ProofTask : AsyncTaskQueue.Taskmodule QueryTask : AsyncTaskQueue.Taskmodule DynBlockData : Dyn.Stype static_block_declaration={block_start : Stateid.t;block_stop : Stateid.t;dynamic_switch : Stateid.t;carry_on_data : DynBlockData.t;}type document_node={indentation : int;ast : Vernacexpr.vernac_control;id : Stateid.t;}type document_view={entry_point : document_node;prev_node : document_node -> document_node option;}type static_block_detection= document_view -> static_block_declaration optiontype recovery_action={base_state : Stateid.t;goals_to_admit : Evar.t list;recovery_command : Vernacexpr.vernac_control option;}type block_classification=|ValidBlock of recovery_action|Leakstype dynamic_block_error_recovery= doc -> static_block_declaration -> block_classification
val register_proof_block_delimiter : Vernacextend.proof_block_name -> static_block_detection -> dynamic_block_error_recovery -> unit
val state_computed_hook : (doc:doc -> Stateid.t -> in_cache:bool -> unit) -> unitval unreachable_state_hook : (doc:doc -> Stateid.t -> Exninfo.iexn -> unit) -> unitval state_ready_hook : (doc:doc -> Stateid.t -> unit) -> unitval forward_feedback_hook : (Feedback.feedback -> unit) -> unitval document_add_hook : (Vernacexpr.vernac_control -> Stateid.t -> unit) -> unitUser adds a sentence to the document (after parsing)
val document_edit_hook : (Stateid.t -> unit) -> unitUser edits a sentence in the document
val sentence_exec_hook : (Stateid.t -> unit) -> unitUser requests evaluation of a sentence
val get_doc : Feedback.doc_id -> doc
type state=|Valid of Vernacstate.t option|Expired|Error of exn