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