Something went wrong. Try again.
forked from coq/coq
Something went wrong. Try again.
1234567891011121314151617181920212223242526272829303132333435363738(************************************************************************)(* * The Rocq Prover / The Rocq Development Team *)(* v * Copyright INRIA, CNRS and contributors *)(* <O___,, * (see version control and CREDITS file for authors & dates) *)(* \VV/ **************************************************************)(* // * This file is distributed under the terms of the *)(* * GNU Lesser General Public License Version 2.1 *)(* * (see LICENSE file for the text of the license) *)(************************************************************************)
type t
val make : loc:Loc.t -> Pp.t -> t
val pp : t -> Pp.t
val loc : t -> Loc.t
(** [register h] registers [h] as a quickfix generator. When an error is generated the toplevel can check if there is quick fix for it.
Quickfix generators signal that they don't deal with some exception by returning []. Raising any other exception is forbidden.
Exceptions that are considered anomalies should not be handled by Quickfix generators.*)
val register : (exn -> t list) -> unit
(** computes all the quickfixes for a given exception *)val from_exception : exn -> (t list, Exninfo.iexn) result
(** Prints all the quickfixes in a vertical box *)val print : t list -> Pp.t