diff options
Diffstat (limited to 'stm/stm.mli')
-rw-r--r-- | stm/stm.mli | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/stm/stm.mli b/stm/stm.mli index a31e4289d..30e9629c6 100644 --- a/stm/stm.mli +++ b/stm/stm.mli @@ -30,7 +30,7 @@ exception End_of_input If [newtip] is provided, then the returned state id is guaranteed to be [newtip] *) val add : ontop:Stateid.t -> ?newtip:Stateid.t -> - bool -> (Loc.t * Vernacexpr.vernac_expr) -> + bool -> Vernacexpr.vernac_expr Loc.located -> Stateid.t * [ `NewTip | `Unfocus of Stateid.t ] (* [query at ?report_with cmd] Executes [cmd] at a given state [at], @@ -205,13 +205,6 @@ type state = { val state_of_id : Stateid.t -> [ `Valid of state option | `Expired | `Error of exn ] -(** read-eval-print loop compatible interface ****************************** **) - -(* Adds a new line to the document. It replaces the core of Vernac.interp. - [finish] is called as the last bit of this function if the system - is running interactively (-emacs or coqtop). *) -val interp : bool -> vernac_expr located -> unit - (* Queries for backward compatibility *) val current_proof_depth : unit -> int val get_all_proof_names : unit -> Id.t list |