Source file loc.ml

open! Import

type 'a t = 'a loc = { txt : 'a; loc : Location.t }

let txt t = t.txt

let loc t = t.loc

let make ~loc txt = { loc; txt }

let map t ~f = { t with txt = f t.txt }