type 'a with_loc
type 'a t
= 'a Loc.t
val loc : _ t ‑> Location.t
val mk : ('a ‑> 'a t) with_loc
val map : ('a ‑> 'b) ‑> 'a t ‑> 'b t
val map_lident : Ppx_core__.Import.string t ‑> Longident.t t
val lident : (Ppx_core__.Import.string ‑> Longident.t t) with_loc