type t =
| Atom of Stdune.Loc.t * Atom.t |
| Quoted_string of Stdune.Loc.t * string |
| Template of Template.t |
| List of Stdune.Loc.t * t list |
val atom_or_quoted_string : Stdune.Loc.t -> string -> t
val loc : t -> Stdune.Loc.t
val remove_locs : t -> Dune_lang__T.t
val add_loc : Dune_lang__T.t -> loc:Stdune.Loc.t -> t