Pp_parsetree.Location
type t = Warnings.loc = {
loc_start : Lexing.position;
loc_end : Lexing.position;
loc_ghost : bool;
}
val pp : t Fmt.t
val show : t -> String.t
type !'a loc = 'a Location.loc = {
txt : 'a;
loc : t;
val pp_loc : 'a Fmt.t -> 'a loc Fmt.t
val show_loc : 'a Fmt.t -> 'a loc -> String.t