package lambdapi

  1. Overview
  2. Docs
module LSP = Lsp_base
val lp_logger : Buffer.t
type doc_node = {
  1. ast : Pure.Command.t;
  2. exec : bool;
  3. goals : (Pure.goal list * Common.Pos.popt) list;
}
type t = {
  1. uri : string;
  2. version : int;
  3. text : string;
  4. mutable root : Pure.state;
  5. mutable final : Pure.state;
  6. nodes : doc_node list;
  7. logs : ((int * string) * Common.Pos.popt) list;
  8. map : Core.Term.qident Lplib.RangeMap.t;
}
val option_default : 'a option -> 'b -> 'c
val mk_error : doc:t -> Common.Pos.pos -> string -> LSP.J.t
val buf_get_and_clear : Buffer.t -> string
val process_pstep : (Pure.proof_state * (Common.Pos.popt * int * string * Pure.goal list option) list * ((int * string) * Common.Pos.popt) list) -> Pure.Tactic.t -> int -> Pure.proof_state * (Common.Pos.popt * int * string * Pure.goal list option) list * ((int * string) * Common.Pos.popt) list
val process_proof : Pure.proof_state -> Pure.ProofTree.t -> ((int * string) * Common.Pos.popt) list -> Pure.proof_state * (Common.Pos.popt * int * string * Pure.goal list option) list * ((int * string) * Common.Pos.popt) list
val get_goals : ('a * 'b * 'c * 'd list option) list -> ('d list * 'a) list
val process_cmd : 'a -> (doc_node list * Pure.state * (Common.Pos.popt * int * string * Pure.goal list option) list * ((int * string) * Common.Pos.popt) list) -> Pure.Command.t -> doc_node list * Pure.state * (Common.Pos.popt * int * string * Pure.goal list option) list * ((int * string) * Common.Pos.popt) list
val new_doc : uri:string -> version:int -> text:string -> t
val close_doc : 'a -> unit
val dummy_loc : Common.Pos.pos Lazy.t
val check_text : doc:t -> t * LSP.J.t