Module Ppxlib.Location

type t = Astlib.Location.t = {
  1. loc_start : Lexing.position;
  2. loc_end : Lexing.position;
  3. loc_ghost : bool;
}
val in_file : string -> t
val set_filename : t -> string -> t
val none : t
val init : Lexing.lexbuf -> string -> unit
val raise_errorf : ?loc:t -> ('a, Format.formatter, unit, 'b) format4 -> 'a
val of_lexbuf : Lexing.lexbuf -> t
val report_exception : Format.formatter -> exn -> unit
val print : Format.formatter -> t -> unit
type nonrec !'a loc = 'a Astlib.Location.loc = {
  1. txt : 'a;
  2. loc : t;
}
val compare_pos : Lexing.position -> Lexing.position -> int
val compare : t -> t -> int
module Error : sig ... end
val error_extensionf : loc:t -> ('a, Format.formatter, unit, string Astlib.Location.loc * Parsetree.payload) format4 -> 'a
exception Error of Error.t